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Zuerst lesen! 



Der gr6Bte Teil dieses Systemhandbuchs ist fur Anwender geschrieben, die tiefer 
in das EUMEL -System einsteigen und evtl. Systemerganzungen Oder Systeman- 
derungen programmieren wollen. Der erste Teil ist allerdings fur alle interessant, 
die ein EUMEL -System verwenden, selbst tur Anfanger, die ihr System zum et— 
sten Mai in Betrieb nehmen wollen. Entsprechend der verschiedenen Adressaten- 
kreise unterscheiden sich die einzelnen Kapitel stark in der Beschreibungsart. 
Deshaib: 

SM Sie EUMEL - Netting? 

Dann sollten Sie vor dem Einschalten Ihres Systems die Einfuhrung des 
Kapitels "System einschalten" lesen. Don werden keine weiteren Kenntnisse 
vorausgesetzt. Danach sollten Sie erst einmal durch praktisches Arbeiten mit 
Hilfe des Benutzerhandbuchs etwas mit dem System vertraut werden. 



Haben Sie schon einige Zeit mit dem EUMEL gaarbeHet? 
Sind Sie mit dem System emgermaSen vertraut? 

Dann lesen Sie den kompletten Teil 1 ("System einrichten") dieses System- 
handbuchs. Aber nicht mehr! 

Das Lesen der folgenden Kapitel ist fur den einfachen Betrieb des 
EUMEL -Systems nicht erforderlich. Sie setzen auch intime Kenntnis des 
Systems auf dem Niveau des Benutzerhandbuchs voraus und wurden An- 
fanger leicht verwirren. 

Haben Sie Probtame mit Inter Hardware? 

Wenn Sie nichts von Hardware verstehen, fragen Sie einen Fachmannl 

Wenn Sie ein gewisses Grundwissen uber Hardware haben, dann lesen Sie 
Teil 2 ("Hardware und ihre Steuerung"). In diesem Kapitel sollten Sie "3 Ka- 
nale und Konfigunerung" erst einmal auslassen. 
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WoUen Sto tiafar In das Betriebssystem otnstatgon? 
Haban Sie EUMEL - Ertahnmg? 
Haban Sie Propammierarfahmng? 



Darin iesen Sie im Systemhandbuch alles, was Ihnen interessant erscheint. 



TEIL 1: System einrichten 
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Teil 1: System einrichten 



1. Einfuhrung 



Wie Ihr System aufgebaut ist 



Oer kleinstmogliche EUMEL-Rechner besteht aus einem Rechnerkern und einem 
Terminal: 



Rechnerkern 



Terminal 1 



Anmerkung: In manchan FSIIen Ist das Terminal hardwarem&Big In den 
Rechner Integriert. Trotzdem fassen wlr diese physlsche Elnhelt 
dann als zwel loglsch getrennte Komponenten auf, n&mllch 
Rechnerkern und Termlnall 

Wie man sieht, hat das Terminal die Nummer 1. Das bedeutet, daB es uber Kanal 
1 mit dem Rechnerkern verbunden ist. Das EUMEL- System kennt 15 solche 
Kanale, wobei es von der konkreten Hardware abhangt, welche Kanale wirklich 
vorhanden sind, und welche Gerate man daran anschlleBen kann. (Allerdings Ist 
der Kanal 1 als Verbindung zum Terminal 1 Immer vorhanden.) 



In den meisten Fallen wird auch ein Drucker angeschlossen seln. Die genaue 
AnschluBart ist wieder von der konkret verwendeten Hardware abhangig. Nehmen 
wir an, er sei an Kanal 4 angeschlossen: 
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Rechnerkem 











Terminal 1 



' Drucker (Kanal 4) 



Man sieht also, daB LOcken bei der Verwendung der Kanale auftreten durfen. Bel 
Multi - User - Systemen kdnnen weitere Terminals und andere Gerfite (z.B. Plotter) 
angeschlossen werden: 



Rechnerkem 



Terminal 1 
Terminal 2 
Plotter (Kanal 3) 
Drucker (Kanal 4) 



— Terminal 5 



■ Terminal 6 
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Wie Sie die EUMEL- Software erhalten und ein- 
spielen 

Genaue Anweisungen zur Generierung eines EUMEL -Systems kdnnen wir hier 
nicht geben, denn diese hangen von Ihrem Rechnertyp ab. Danach fragen Sie 
bitte Ihren Hard- und Softwarelieferanten. 

Im allgemeinen werden Sie unter anderem eine Diskette mit der Aufschrift "HG" ( 
Hintergrund), eine Diskette mit der Aufschrift "ARCH IV: conf" und mehrere Dis- 
ketten mit der Aufschrift "ARCHIV: std" (Standardarchive) bekommen haben. Dabei 
befinden sich auf der Hintergrund - Diskette die standardmaBig immer vorhande- 
nen Teile des EUMEL - Systems, wahrend die Standardarchive viele nutzliche 
Programme enthalten, auf die Sie bei Bedarf zuruckgreifen kdnnen. 

In Ihrem Rechner gibt es hdchstwahrscheinlich ein Hintergrund- und ein Archiv- 
gerat. Das letztere ist fast immer ein Floppylaufwerk. Als Hintergrundgerat steht 
moistens ein Plattenlaufwerk oder ein oder mehrere Floppylaufwerke zur Verfugung 
(genaueres vom Hardwarelieferanten). 

Beim ersten Systemstart mussen Sie (nach evti. notwendigen Generierungslaufen) 
den Hintergrund auf das Hintergrundgerat kopieren. Dazu gehen Sie fokjenderma- 
Ben vor. 

Beim Systemstart fuhrt das EUMEL -System zuerst einen Spelchertestdurch. 
Dabei erscheint das Wort "Speichertest:" auf dem Bildschirm des Haupt- 
terminals. Wahrend des Tests werden -Zeichen ausgegeben. In dieser 
Zeit drOcken Sie die Taste < ESC > . Dann wird nicht "durchgestartet", 
sondern es erscheint ein Startmenu, das Ihnen unter anderem 

(1) Systemstart 

(2) Hintergrund von Archiv laden 

anbietet. Legen Sie jetzt die Diskette "HQ" mit dem Hintergrund in das 
AjvhMaufwerk ein. Dann (Eingabe von Ihnen sind mit einem Pfeil nach links 
gekennzeichnet, Ausgaben vom Rechner mit > ): 
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< 2 



> 1. HG-Archiv eingelegt (j/n)? 



< 



Jetzt wird der Hintergrund eingespielt. Oanach erscheint wieder das Start- 
menu. Wahlen Sie jetzt Alternative (1), urn das System zu starten. 



Anmerkung: Auch wenn Sie ein FToppyiaufwerk ats Hintergrundgar&t verwanden, 
legen Sie den mitgetiefarten Hintergrund nie in dieses Laufmerk. urn 
ZersMrungen dfesar "Mutter" zu verhindem. 



Die verschiedenen auf dem Markt befindlichen Terminal- und Oruckertypen sind 
leider nicht so genormt, dafl sie alle gleichartig vom EUMEL -System angespro- 
chen werden kdnnen. Deshalb mu8 man das EUMEL -System bei der Inbetrieb- 
nahme konHgurieren. 

Die Konfiguration wird automatisch nach dem ersten Systemstart im Dialog erfragt. 
Alle einstellbaren Typen werden auf dem Bildschlrm aufgelistet. Sie stellen die 
Nummer des Kanals und seinen Geratetyp ein. Beispiel (mit reduzierter Anzahl von 
Geratetypen): 

> FT10 WS581 F10-55 PR1471 



Wie Sie die Konfiguration einstellen 



FTIOascii 

VC404 

VC404ascii 



M20 

ELBIT 

ELBITascii 



F10-55 

FX80 

P400 



PR320 

STDPRT 

STDPRTascii 
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> Kanal: 

< 1 < RETURN > 

> Typ: 

< FT10 < RETURN > 

> Noch ein Kanal zu konfigurieren (j/n) 

< j 

> Kanal: 

< 4 < RETURN > 

> Typ: 

< P400 < RETURN > 

> Noch ein Kanal zu konfigurieren (j/n)? 

< n 

> Koennen unbenutzte Geraetetypen geloescht werden (j/n)? 

< j 



Dabei ist folgendes zu beachten: 

- In dem Menu sind sowohl Terminal - als auch Druckertypen aufgefuhrt. 

-Welches Gerfit bei Ihnen an welchem Kanal angeschlossen ist bzw. 
werden kann, erfahren Sie von Ihrem Hard-/Softwarelieferanten. 

- Enden die Typbezeichnungen mit "ascil", kennen die Gerate keine Um- 
lauts und kein "8", aber die Zeichen "[]{}\|". Fehlt die Bezeichnung "as- 
cii", ist der deutsche Zeichensatz mit Umlauten und "6" vorhanden, evil, 
sind aber die Zeichen "[]{ }\ | " nicht darstellbar. Manche Gerate kann man 
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hardwaremaBig auf "ascii" Oder "deutsch" schalten. Ublicherweise wird 
man dann hardwarem&Big die deutsche Version wahlen und auch bei der 
Konfigurierung elnstellen. 

-Wenn die Bezeichnung Ihrer Gerate in dem Menu nicht erscheint, fragen 
Sie den Lieferanten Ihrer Hard- und Software. Mdglicherweise k6nnen Sie 
das Gerat doch ohne weitere Umstande konfigurieren, weil es genauso wie 
eines der aufgefuhrten Gerate behandelt werden muB. (Viele verschie- 
dene Typen kdnnen gleichartig angeschlossen werden; das Menu 1st aber 
begrenzt.) 

- Sie k6nnen einen Kanal beliebig oft hintereinander umkonfigurieren. Wenn 
Sie also einen Fehler gemacht haben, geben Sie einfach den Kanal noch 
einmal an. 

-Wenn Sie alle die Kanale, die Sie benitigen, richtig konfiguriert haben, 
antworten Sie auf die Frage "Noch ein Kanal zu konfigurieren (j/n)?" mit 
"n". 

- Beim Systemstart befindet sich fur jeden Geratetyp eine Tabelle im 
System. Urn Platz zu sparen. warden die nicht ben6tigten Tabellen nach 
der Konfigurierung geloscht, wenn man auf die Frage "Koennen unbe- 
nutzte Geraetetypen geloescht werden (j/n)?" mit "j" antwortet. (Keine 
Angst, man kann sie von den mitgelieferten Standardarchiven wieder la- 
den.) 



Danach ist Ihr System konfiguriert und Sie k6nnen wie in der Beispielsitzung aus 
dem Kapitel "Einfuhrung" des Benutzerhandbuchs fortfahren. In jedem Fall 
mussen Sie das System verm itt els der SV- Taste anrufen, urn ein Supervisor - 
Kommando geben zu k6nnen. Dazu drucken Sie die SV- Taste. 



Nicht weiterlesen! 



Erst, wenn Sie etwas Erfahrung gesammelt haben, sollten Sie das folgende lesenl 



TEIL 1: System einrichten 
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2. Ausfuhrliche Beschreibung 



System laden 



Wie in der Einfuhrung dieses Kapitels beschrieben ist, geht man beim Systemstart 
durch Eingabe von < ESC > wahrend des Vortests in das Startmenu und wahlt 
dort "Hintergrund von Archiv laden" an. Falls der zu ladende Hintergrund sich Ober 
mehrere Archiv - Disketten erstreckt, werden die folgenden sukzessive angefor- 
dert. 



System sichern 



Der aktuelle eigene Hintergrund laBt sich (mit alien Tasks und alien Dateien) durch 
das Kommando 

save system 

auf Archivdisketten sichern. Dabei wird erst eln 'shutup' durchgefuhrt. Anschlie- 
Bend werden formatierte Disketten angefordert. Der Hintergrund wird komprimiert 
gesichert, d.h. nur die belegten Bldcke werden auf das Archiv geschrieben. 

Anmerkung: Diese Prozedur kann in Multi - User - Systemen nur von privilegierten 
Tasks (Nachfahran von "SYSUR") wie dem OPERATOR aufgerufen 
werden. 
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Multi - User - System gegen Unbefugte schutzen 



Falls der Benutzerkreis einss Multi -User- Systems nicht "gutartig" ist, sollte man 
verhindem, dafi jeder Benutzer des Systems Zugang zu privilegierten Operationen 
hat, wie Ldschen artderer Tasks, Konfiguration andem und System sichern. 

Dies erreichen Sie dadurch, dafl Sie alle privilegierten Tasks, das sind "SYSUR" 
und alle Sonne, Enkel usw. von SYSUR durch PaBworte schutzen. Damit wird der 
Zugang zu diesen Tasks nur moglich, wenn man das entsprechende PaBwort 
eingibt. Man definiert solche Task - PaBworte, indem man die zu schutzende Task 
mit Hilfe des Supervisor -Kommandos "continue" an ein Terminal holt und dann 
das Kommando 

task password ("simsalabim") 

gibt. Dabei ist "simsalabim" nur eln Beispiel. Bitte verwenden Sie ein anderes 
PaBwortl Da die Eigenschaft, privilegiert zu sein, nur davon abhangt, im 
"SYSUR" -Zweig (und nicht im normalen "UR"-Zweig) des Systems zu sein, 
kdnnte sich ein gewitzter Anwender die Privileglerung einfach erschleichen, indem 
er eine neue Sohntask von "SYSUR" einrichtet. Urn auch diese Mdglichkeit zu 
unterbinden, sollte man in jeder Task des SYS-Zweiges ebenfalls ein 'begin"- 
PaBwort definieren. Oas geschieht mit dem Kommando 

begin password ("simsalabim") 

Bel der Wahl der PaBworte sollte man folgendes bedenken: 

- Ein PaBwort merkt sich leichter als viele verschiedene. 

- Ein zu kurzes oder offensichtliches PaBwort (beispielsweise der Name des 
Systemverwalters) kommt schnell heraus. 

- Oft werden PaBworte bekannt, well irgendwo ein Zettel mit den PaBworten 
herumliegt. 

- Der PaBwortschutz ist hart. Wenn man sein PaBwort vergessen hat, gibt 
es keinen Zugang mehr zu der geschutzten Task. 



TEIL 1: System einrichten 
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Konfiguration im Multi - User -System 



In Multi- User -Systemen Ifluft die Konfiguration Ober die Task "configurator" ab. 
Diese Task mussen Sie also fur die hier aufgefuhrten Operationen durch das 
Supervisor -Kommando "continue" angekoppeln. (Dabei wird das Paflwort Gber- 
pruft, falls die Task - wie in der Einfuhrung beschrieben - geschutzt wurde.) 

Anmerkung: Man kann die Task "configurator" Idschen und dann neu (als Sohn, 
Enkel,... von SYSUR) wieder einrichten. Danach gibt man das 
Kommando "configuration manager". 



Der in der Einfuhrung unter "Wie Sle die Konfiguration einstellen" beschriebene 
Konfigurationsdialog laBt sich vermlttele des Kommandoa 

configurate 

aufrufen. Dabel wird fur jeden angewahlten Kanal die bis jetzt gultlge Einstellung 
als Vorschlag mit ausgegeben. Die Einstellung aller Kanale, die nicht angespro- 
chen werden, bleiben unver&ndert. 

Im Menu werden die Namen aller Dateien mit Geratetabellen aufgefuhrt, die in der 
Task enthalten sind. Daraus folgt, daB nur noch die bei der letzten Konflgurierung 
benutzten Typen aufgefuhrt werden, wenn vorher auf die Frage "Koennen unbe- 
nutzte Geraetetypen geloescht werden (yn)?" mit "j" geantwortet wurde. Nun sind 
alle ausgelieferten Geratetabellen auf dem Archiv "conf" vorhanden, so daB man 
wieder benfitigte Geratetypen dadurch verfugbar machen kann, daB man die ent- 
sprechenden Dateien von dem Archiv ladt. Dieses Archiv enthait auch die Gene- 
ratoren der Geratetabellen (z.B. "FTIO.gen"), die es eriauben, die Tabellen abzu- 
ftndem. Das sind ELAN - Programme, die die Tabellen erceugen. Nftheres dazu 
findet man in "Tail 2, 3. Kanale und Konflgurierung". 

Will man seine eingestellte Konfiguration sichern, reicht es, alle Dateien der Task 
"configurator" auf ein Archiv zu schreiben. Diese Konfiguration kann man dann bei 
einem neuen Hintergrund einfach vom Archiv laden. Um die Konfigurierung dann 
auch auszufuhren, gibt man das Kommando "configurate". Den Dialog kann man 
aber sofort abbrechen, indem man als ersten Kanal "0" angibt. 
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Konfiguration im Single- User -System 



In Single - User - Systemen kann man die Konfiguration nur zu Beginn einmal 
einstellen. Will man sie andem, sollte man einen frischen Hintergrund erzeugen 
und neu konfigurieren. Die Konfiguration kann auch nicht gesichert werden. (Nor- 
malerweise durften auch nur ein Terminal- und ein Oruckerkanal von Interesse 

sei.) 

Die Initialisierung des Systems gemaB der eingestellten Konfiguration erfokjt 
automatisch bei jsdem Systemstart nach ordnungsgemaBem "shutup". Im Gegen- 
satz zum Mufti - User muB die Initialisierung der intemen Geratetabellen bei einem 
RERUN -Start (d.h. das System wurde vorher nicht korrekt mit "shutup" abge- 
schaltet) explizit durch das Kommando 

configurate 

vorgenommen werden. 

Anmerkung: Gerade in RERUN -Situationen ist man aber oft nicht im Monitor Oder 
Editor. Um ein laufendes Programm abzubrechen, braucht man dann 
u.U. die SV- Taste. Diese ist aber ger&tespezifisch und steht erst zur 
Verfugung, nachdem die Geratetabellen geladen worden sind. Zur 
Abhilfe wirkt < CONTROL g> (Control- und g- Taste gleichzeitig) als 
SV- Taste, solange die GerStetabellen noch nicht geladen worden 
sind. 

Deshaib: Falls notwendlg das lautende Programm durch < CONTROL 
g> abbrechen und dann bei "gib kommando:' das Kom- 
mando 'configurate" geben. 



Drucker - und Textsoftware im Single - User 



In Single - User - Systemen ist (aus Platzgrunden) noch keine Druckersoftware 
insertiert. Ebenfalls sind 'pageform', 'lineform' und 'indexer' nicht generiert. Die 
entsprechenden Pakete sind deshaib in den Standardarchiven enthalten. 
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Zur Generierung des Standarddruckers meldet man das Archiv 'std' an: 
archive ("std") 

Falls das Standardarchiv auf mehrere DisKetten aufgeteilt ist, muB man nun dieje- 
nige suchen, die die Datei "std printer generator/S" en t halt. Dazu kann man das 
Kommando 

list (archive) 

verwenden. Wenn die richtige Diskette im Lautwerk liegt, kann die Generierung 
dann erfolgen: 

fetch ("std printer generator/S", archive) 

run 

Daoei wird die Nummer des Kanals, an den der Drucker angeschlossen ist, im 
Dialog erfragt. Danach konnen Dateien mlt dem Kommando "print" gedruckt 
warden. 

Anmerkung: Der eigentliche Druckertyp wurde schon bei der Konfigurierung ein- 
gestellt. 

Wenn die Textsoftware ebenfalls generiert warden soil, geschieht das entspre- 
chend dem obigen Modell. Als Generator - Datei wird allerdings "texter genera- 
tor/S" verwandt: 

fetch ("texter generator/S", archive) 

run 
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Orucker- und Textsoftware im Multi-User 



In Multi - User- Systemen sind sowohl Drucker als auch Textsoftware schon 
standardmaBig vorhanden. Allerdings muB hler dem Drucker noch mitgetellt weden, 
welchen Kanal er benutzen soil. Dazu holt man sich die Task "PRINTER" mit dem 
Supervisor - Kommando 

continue ("PRINTER") 

an ein Terminal und definiert dann den Druckerkanal (hier Kanal 4): 

start (4) 

Danach koppelt die Task sich automatisch vom Terminal ab und der Orucker steht 
zur Verfugung. 



TEIL 2: Hardware und ihre Steuerung 
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Teil 2: Hardware und ihre Steuerung 



Vorwort 



Die Hardware eines jeden EUMEL- Systems lABt sich In Rechnerkern und Peri- 
pherie einteilen. 

a) Der Rechnerkern 

In der Regel wird der Rechnerkern aus folgenden Komponenten bestehen: 
-CPU 

- Vordergrundspelcher (oft als RAM bezeichnet) 

- Hintergrundspeicher (Floppy, Harddisk, Oder auch RAM/ROM) 

Alle Daten, Dateien und Programme werden auf dem Hintergrundspeicher abge- 
legt. Der bendtigte Plata wird dabei dynamisch nach Bedarf zugewiesen. Jeder 
Zugriff auf Daten, die sich auf dem Hintergrundspeicher befinden, muB uber den 
Vordergrundspeicher erfolgen. Zu diesem Zweck verlagert das EUMEL -System 
automatisch alle aktuell bendtigten Daten in den Vordergrundspeicher. Das erfolgt 
nach dem Prinzip des Demand - Paging (s. Benutzerhandbuch Kap. 1). Die CPU 
fuhrt die aktiven Programme (unter Benutzung des Speichers) aus. Dabei bear- 
beitet sie reihum alle rechenwilligen Prozesse. 

Die drei Komponenten des Rechnerkems werden vollstandig vom EUMEL -Be- 
triebssystem verwaltet und mlteinander verknupft, so daB der Anwender sich in der 
Regel darum weder kummem muB noch kann. Ausgenommen davon sind aller- 
dings die Diagnose von Hardwarefehlem und Uberiegungen zur Systemleistung. 
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b) Die Peripherie 

Alle anderen Qerilte Oder Geratekomponenten gehoren aus der Sicht des 
EUMEL -Systems zur Peripherie. Wesentliches Kennzeichen ist, dafi sie uber 
Kanale mit dem Rechnerkem verbunden sind und von dort aus durch System - 
und Anwenderprogramm gesteuert werden kdnnen. Angeschlossen warden konnen 
u.a. 

- Terminals 

- Drucker und Plotter 

- andere Rechner bzw. Rechnemetze 

- Archivgerftte (z.B. Floppy - Laufwerke) 

In der Regel hat jedes EUMEL -System mindestens ein Terminal und Archlvlauf- 
werk. Auch wenn dieses "Terminal 1" und das Floppy - Laufwerk baulich in den 
Rechner Integlert sind, gehoren sie logisch zur Peripherie. Die entsprechenden 
Kanale sind dann allerdings Teil des Rechners und brauchen den Anwender nicht 
zu interessieren. Die beiden wesentlichen anderen Kanaltypen sind: 

- serielle Schnittstellen (V24) 

- Parallelschnittstellen 

Beide fuhren "echt" aus dem Rechner heraus und sind u.U. hardwaremaBig fur 
den Anwender von Bedeutung. NormaJerweise sollte zwar der Lieferant der 
EUMEL -Hardware fur die Verkabelung und den AnschluB peripherer Gerate 80 r- 
gen, aber Kenntnisse konnen in Fehlersituationen (z.B. Kabelbruch), bei Umkonfl- 
gurierungen und bei Kombinierungen verschiedener Gerate helfen. 



1. Hardware - Test 



Der EUMEL- Hardware -Test ist ein rechnerunabhangiger Test und kann demzu- 
folge nicht so viel uberprufen wis Testprogramme, die genau auf eine entspre- 
chende Hardware zugeschnitten sind. Trotzdem sollten die meisten Hardware - 
Fehler schon mit dem EUMEL -Hardware -Test gefunden werden. 



TEIL 2: Hardware und ihre Steuerung 
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Bei jedem Systemstart wird der "Vortest" durchgefuhrt. Nach Information uber 
generierte Terminals, Speicher und Hintergrund testel er einmal den Hauptspet- 
cher. Danach wird das eigentliche EUMEL - System gestartet. 

Durch Eingabe eines beliebigen Zeichens wahrend des Vortests kommt man in 
den ausfuhrtichen Start- Dialog. Don wird u.a. auch die M6glichkeit "Hardware - 
Test" angeboten. Wahlt man diese an, werden die verfugbaren Tests als Menu 
aufgelistet. Bei jedem EUMEL -System stehen mlndestens folgende Testmoglich- 
keiten zur Verfugung: 

(1) Speichertest 

(2) Kanaltest 

(3) Hintergrundtest 

(4) Archlvtest 

Alls Tests sind dabei Dauertests, d.h. sie beginnen nach jedem Durchlauf von 
neuem, konnen aber durch < ESC > abgebrochen werden. 

Rechnerabhangig konnen weitere Tests angeboten werden. 

Im fokjenden sind aber nur die 4 Standardtest naher beschrieben. 



Speichertest 



Der Speichertest soli den Vordergrundspeicher (RAM) des Rechners untersuchen. 
Gerade Speicherfehler tendieren aber dazu, nur sporadisch aufzutreten oder war- 
meabhangig zu sein. Deshalb sollte der Test bel Verdacht auf Speicherfehler lan- 
gere Zeit (einige Stunden) laufen. Leider konnen auch dann nicht alle Fehler auf- 
gedeckt werden, z.B. nicht solche, die nur in ganz speziellen Situationen entste- 
hen, wie Speicherzugriff mit gleichzeitig anlaufendem Floppymotor und Zeichen- 
ausgabe. Generell gilt hier (wie fur jeden Test), daB die Abwesenhelt von Fehlern 
nie vollkommen sicher nachgewiesen werden kann. 
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Der Speichertest teilt den Speicher in drei ineinander verschrankte Bereiche auf: 

0 : adresse MOD 3 » 0 

1 : adresse MOO 3 » 1 

2 : adresse MOO 3 = 2 

Der freie Speicher wird nach folgendem Algorithmic gepruft: 

schreibe (1. OLOLOLOL) ; out ( ) ; 

schreibe (2, OLOLOLOL) ; out ( ) ; 

schreibe (0, LOLOLOLO) ; out ( ) ; 

pruefe (1, OLOLOLOL) ; out ( ) ; 

schreibe (1, LOLOLOLO) ; out ( ) ; 

pruefe (2, OLOLOLOL) ; out f") ; 

pruefe (0, LOLOLOLO) ; out ("*") ; 

pruefe (1, LOLOLOLO) ; out (-") ; 

schreibe (0, OLOLOLOL) ; out ( ) ; 

pruefe (0, OLOLOLOL) ; out (" ,H ) ; 

schreibe (2. LOLOLOLO) ; out ( ) ; 

pruefe (2, LOLOLOLO) ; out ("'") . 



Dabei werden durch 'PROC schreibe (INT CONST bereich, BYTE CONST muster)' 
alle Bytes des entsprechenden Bereichs mit dem angegebenen Muster geladen. 
'PROC pruefe (INT CONST bereich, BYTE CONST 60ll)' iiberpruft entsprechend 
alle Bytes des Bereichs darauf, ob sie das Sollmuster enthalten. 

Findet der Speichertest Fehler. k6nnen u.a. folgende Ursachen vorliegen: 

- Ein Speicherchip ist defekt. 

- Die Versorgungsspannung fur den Speicher (meistens + 5V) ist zu niedrig, 
d.h. das Netzteil ist nicht richtig eingestellt bzw. defekt. (Das kann insbe- 
sondere dann entstehen, wenn ein Rechner so "hochgerustet" wurde, dafl 
das Netzteil nachgeregelt werden muBte.) 

- Die Kontakte der Speicherkarten sind locker Oder oxidiert. 

- Die Speicheransteuerung ist defekt. 
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Kanaltest 



Beim Kanaltest warden andauemd auf alien Terminalkanftlen (auSer auf Terminal 1) 
die jeweiligen KanaJnummem in der Form "Kanal: n" ausgegeben. Jedes Einga- 
bezeichen wird in dezimaler Verschlussung unter Angabe der Kanalnummer auf 
dem Terminal 1 gemeldet. 

Mit Hilfe dieses Tests k6nnen u.a. Kabel und Gerateeinstellungen uberpruft war- 
den. M6gliche Fehlerursachen: 

- falsche Baudrate eingestellt 

Symptome:Bei Aus- und Etngabe werden vollkommen unsinnige Zeichen 
angeliefert. 

Abhilfe: Baudrate am Endgerat Oder am Rechner richtig einstellen. 

- falsche Paritat eingestellt 

Symptome:Einige Zeichen werden richtig ubertragen, andere verfalscht. In 
einigen Fallen k6nnen auch alle Zeichen falsch ubertragen wer- 
den. 

Abhilfe: Paritat am Endgerat oder am Rechner richtig einstellen. 

-falsches Kabel (z. B. Sende- und Empfangsleitungen falschlicherweise 
gekreuzt bzw. nicht gekreuzt, Kabel ohne FluBkontrolle an 
Schnittstelle mit FluBkontrolle, V24- Kabel an Parallel- 
schnlttstelle oder umgekehrt): 

Symptome:Keine Ausgabe, keine Eingabe oder andauemder Strom von 

"Schrottzeichen". 
Abhilfe: richtiges Kabel nehmen oder Kabel korrigieren. 

- defektes Kabel (Kabelbruch, defekter Stacker o.a.) 

Symptome:beliebig. 
Testm6glichkeit: Kabel wechseln. 
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- defektes Endgerat 
Symptome:belieblg. 

Testm6glichkeit: Anderes Gerat mit gleicher Einstellung (Baudrate, Paritftt 
usw.) anschlieBen. 

- defekte Schnittstelle im Rechner 
Symptome.'beliebig 

Testmoglichkeit: Endgerat mit gleichem Kabel an eine andere Schnitt- 
stelle am Rechner anschlieBen (dazu evtl. die Gerate- 
parameter wie Baudrate anpassen). 



Hintergrundtest 



Zur Uberprufung des Hintergrundes werden drei Tests angeboten: 

(1) Lesetest 

(2) Lese-/Schreibtest 

(3) Positioniertest 



Der Lesetest pnjft, ob alle fur EUMEL verfugbaren Blocke auf der Platte bzw. 
Floppy lesbar sind. Dabei wird der Blocklnhalt nicht inspiziert. Sowohl behebbare 
(soft) als auch harte Lesefehler werden gemeldet. Der Bediener kann einen Kor- 
rekturversuch durch Ruckschreiben veranlassen. Bei einem Softerror (Block konnte 
nach mehreren Versuch doch gelesen werden) wird der gelesene Block neu 
geschrieben. Der Fehler kann jetzt ohne negative Folgen behoben sein, bei de~ 
fekter Hardware aber auch zu Folgefehlem fuhren. 

Als Korrekturversuch bei harten Fehlern wird ein mit 'FFFD' gefullter Block ge- 
schrieben. Wird ein solcher Block spater vom EUMEL gelesen und als Code an- 
gesehen, fuhrt das zur Fehlermeldung "code block unreadable". Wird FFFD als 
INT angesehen, liefert es den Wert -3, bei REAL oder TEXT k&nnen keine Vor- 
hersagen gemacht werden. 
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Bel dem Schwib -A-esetest wird zuerst eine Prufsumme uber den ganzen Hin- 
tergrund gebildet. In jedem weiteren Durchlauf wird der Hintergrund blockweise 
gelesen und wieder zuruckgeschrieben. Oabei wird wiederum eine Prufsumme 
gebildet und mit der alten verglichen. Der Test bricht bei falscher Prufsumme Oder 
nach < ESC > an Terminal 1 ab. 

Achtung: Normalerweise zerstort der Test den EUMEL - Hintergrund nicht. Bei 
defekter Platte kdnnen allerdings Blocke durch das Ruckschreiben 
zerstort werden. 

Der Positionieningstest arbeitet ahnlich wle die Leseprufung. Allerdings wird in der 
Reihenfolge 0, 1, 0, 2, 0, 3, ... gelesen, so daB die Platte fur jeden Lesevorgang 
positionieren mu6. 

Achtung: Wegen der harten Plattenbelastung sollte dieser Test nicht zu lange 
laufen. 



Archivtest 



Der Archivtest arbeitet ahnlich wle der Hintergrundtest - allerdings auf dem Ar- 
chiv. Er kann sowohl zur OberprOfung von Archiv - Datentragem (Lesetest) als 
auch zum Test des ArchMaufwerks benutzt werden. 



2. Serielle Gerateschnittstelle 



Pinbelegung und Kabel 



Armerkung: Dieses Kapitel tsf nur fur sotche Anwender von Bedeutung, die sich 
se/bst mit der Verkabelung ihrer Ger&te befassen. 
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Im folgenden warden die wichtigsten Leitungen der offiziellen V24 - Schnittstelle( 
serielle Schnittstelle zum AnschluB von Terminals, Druckern, Fremdrechnem u.a.) 
beschrieben: 

Pin Betriebsrichtung Bedeutung 



2 out Sendedaten 

3 in Empfangsdaten 

4 out Sendeaufforderung (RTS) 

5 in Empfangsbereltschft (CTS) 

7 Signalerde 

6 in Gegenstation bereit (DCD) 
20 out eigene Station bereit (DTR) 



Dabei dient das Paar (2,3) zur Ubertragung der Daten, mit Hilfe von (4,5) ist FluB- 
kontolle mdglich (z.B. kann ein Drucker damit Sendungen vom Rechner "ver- 
langsamen"). Das Paar (8,20) wird bei manchen Ger&ten und Rechnem benutzt, 
um festzustellen, dafi die Gegenstation eingeschaltet Ist. 

Die meisten Rechner haben die gleiche Pinbelegung wie oben aufgefuhrt. Die 
Kabel mussen dann die folgende Pins verbinden: 

Rechner 2 3 4 5 7 6 20 Vollstandige Verbindung mit FluBkontrolle. 
Gerat 2 3 4 5 7 8 20 



Rechner 2 3 4 5 7 Reicht fur die meisten Anschlusse mit FluBkon- 

Y Y | trolle, z.B. Rechnerkopplung. 

Gerat 23 45 7 
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Rechner 2 3 5 7 

X / I 

Gerat 2 3 4 7 



Reicht fur die meisten Orucker, FluBkontrolle nur 
einseitig vom Drucker zum Rechner. 



Rechner 2 3 
Gerat 2 



id / 



Reicht moistens fur Terminals, FluBkontrolle ist 
dabei uberflussig. 



Rechner 2 3 4 5 7 

X " I 

Gerat 2 3 7 



Manchmal fur Terminals. Rechnerseltig wird 
FluBkontrolle durch die Brucke 4-5 simuliert. 



Bel manchen Rechnem werden die notwendigen paarweisen Vertauschungen 
schon im Rechner durchgefuhrt. Es erglbt sich entsprechend: 



Rechner 2 3 4 5 7 8 20 Vollstandige Verblndung mit FluBkontrolle. 

II II I I I 

Gerat 2 3 4 5 7 8 20 



Rechner 2 3 4 5 7 

II II I 

Gerat 2 3 4 5 7 



Einfacher AnschluB mit FluBkontrolle. 



Rechner 2 3 4 7 

II I I 

Gerat 2 3 4 7 



Drucker, einseitlge FluBkontrolle. 



Rechner 2 3 
II 

Gerat 2 3 



Terminal. 
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Rechner 2 3 4 5 7 Terminal mit simulierter FluBkontrolle. 

II U I 

Gerat 2 3 7 



3. Kanale und Konfigurierung 



lm EUMEL -System dienen Kanale zur Kommunikatlon mit der AuBenwelt, d.h. 
Kanale sind Verbindungen vom Rechner zu peripheren Geriten wie Terminals, 
Orucker, Plotter und Archlv. Kanale k6nnen fur zeichen- und blockorientierte 
Ein-/Ausgabe verwendet werden. Ein Kanal heiBt privilegiert , wenn er nur von 
privilegierten Systemtasks (Nachkommen des Supervisors) benutzt werden kann. 

Kanalaufteilung: 

Kanal Bedeutung 

1 zeichenorientiert, blockorientiert 

Dieser Kanal muB mit einem Terminal verbunden sein, da 
fiber ihn der Systemstart erfolgt. 

2-15 zeichenorintiert, blockorientiert 

Diese Kanale werden fur weitere Terminals, Drucker, 
Plotter, Rechnerkopplung usw. verwandt. 

1 6 - 23 blockorientiert 

24-30 blockorientiert, privilegiert 

31 blockorientiert, privilegiert 

Dieser Kanal ist der Standardkanal des Archivsystems, 
d.h. ublicherweise wird daruber die Archivfloppy ange- 
sprochen. 
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32 blockorientiert, privilegiert 

Dieses ist ein intemer Kanal, an den kein externes Gerat 
angeschlossen werden kann. Er wird zur Konfigurierung 
der anderen Kanale benutzt. 

Der Supervisor des EUMEL- Systems verwaltet die Kanale. Jeder Task ist dabel 
kein oder genau ein Kanal zugeordnet. Entsprechend ist jedem Kanal keine Oder 
genau eine Task zugeordnet. Solche Zuordnungen k6nnen von auBen durch den 
Benutzer uber die SV-Kommandos 'continue' und 'break' (nur bei interaktiven 
Kanalen) und vom Programm selbst uber die Prozeduren 'break' und 'continue' (s. 
Teil 5) verandert werden. In jedem Fall uberpruft der Supervisor die Zugriffsbe- 
rechtigung. 



Zeichenorientierte Ein - /Ausgabe 



Zeichenorientierte Ein -/Ausgabe kann auf den Kanalen 1 bis 15 benutzt werden. 
Dafur stehen die Basisoperationen 

PHOC out (TEXT CONST text) 

PROC outsubtext (TEXT CONST source, INT CONST from) 
PROC outsubtext (TEXT CONST source, INT CONST from, to) 
PROC cursor (INT CONST x, y) 
PROC inchar (TEXT VAR char) 
TEXT PROC incharety 

TEXT PROC incharety (INT CONST time limit) 
PROC get cursor (INT VAR x, y) 

und alle darauf aufbauenden Operationen (wie 'put', 'get', 'putline', 'getline' usw.) 
zur Verfugung. Diese Kanale sind 'konfigurierbar' (s.u.) und erlauben den Anruf des 
Systems durch den Benutzer von auBen (SV- Taste). In der Regel werden die 
Kanale 1 bis 15 fur Terminals, Drucker, Plotter und andere zeichenorientierte 
Anschlusse benutzt. 

Wenn ein Kanal zum AnschluB eines Terminals verwendet wird, mussen die Stan- 
dard - Steuerzeichen des EUMEL -Systems (s. Benutzerhandbuch, Teil 3 "Editor", 
"5. EUMEL - Zeichencode") auf jedem Terminal die gleiche Semantik haben. Das 
heiBt beispielsweise, daB der Code ""3"" auf jedem Terminal bei Ausgabe den 
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Cursor um eine Stella nach rechts verschiebt. Da Datenendgerate in dieser Hin— 
sicht aber faktisch keiner Norm gehorchen, mussen die EUMEL- Codes In der 
Regel in terminalspezifische Codes umgesetzt warden. Diese Umsetzregeln kann 
man bei der Konfigurierung (s.u.) festlegen. Fur die meisten Terminaltypen werden 
allerdings fertige Konfigurationssatze mit dem EUMEL -System zusammen aus— 
geliefert, die man bei der Einrichtung des Systems (s. Systemhandbuch Teil 1) 
interaktiv anw&hlen kann. 



Blockorientiere Ein - /Ausgabe 



Blockorientiere Ein - /Ausgabe kann auf den Kanalen 1 bis 32 benutzt werden. 
Dafur stehen die Operatlonen 

PROC control (INT CONST codel, code2, code3. INT VAR return code) 
PROC blockout (DATASPACE CONST ds, 

INT CONST page nr, codel, code2, INT VAR return code) 
PROC blockout (ROW 256 INT CONST block, 

INT CONST codel, code2, INT VAR return code) 
PROC blockin (DATASPACE VAR ds, 

INT CONST page nr, codel, code2, INT VAR return code) 
PROC blockin (ROW 256 INT VAR block, 

INT CONST codel, code2, INT VAR return code) 

zur Verfugung. N&heres findet man in Teil 3 dieses Systemhandbuchs. 
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Konfigurierung von Kanal 1 bis 15 



Alls zeichenorientierten Kanale konnen (vermittels Block I/O auf Kanal 32) konfigu- 
riert werden. Dabei werden im wesentlichen Umsetzregeln fur Ein- und Ausgabe 
definiert. die den Zweck haben, 

-bei der Ausgabe den EUMEL Zeichensatz auf den Zeichensatz des an- 
geschlossenen Gerats abzubilden und 

- bei der Eingabe die gerdtespezifischen Zeichen auf den EUMEL Zeichen- 
satz abzubilden. 

So ist eine ger&teunabhangige Programmierung m6glich. 

Mit Hilfe der Prozedur 'link' kann man einen der Kanale 1 bis 15 auf einen be- 
stimmten Typ setzen. Immer vorhanden sind die Typen: 

"transparent": Keine Codeumsetzungen (fur Drucker usw.) und 

"psi" Keine Codeumsetzungen, jedoch folgende Sonderfunktionen: 



Code Funktion 
7 (CTLg) SV 
17 (CTLq) Stop 
23 (CTLw) Weiter 
4 (CTLd) Info 

Weitere Typen mussen in Form eines DATASPACE gleichen Namens in der Task 
vorliegen, in der das Kommando 'link' gegeben wird. Einige Typen werden auf 
Archiv mit ausgeliefert. (s. Systemhandbuch Teil 1). 

Neue Terminaltypen kdnnen mit den Prozeduren 'new type', 'enter outcode', 'enter 
incode' usw. definiert werden. Im einzelnen stehen folgende Prozeduren zur Ver- 
fugung: 
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link 

PROC link (INT CONST channel, TEXT CONST type) 

Zweck: Der angegebene Kanal (1 bis 15) wird auf den angegebenen Typ 
konfiguriert. 

Hinweis: Die Prozedur 'link' hat die angegebene Wirkung nur, wenn 
die Task an Kanal 32 hangt, der nur fur Sonne des 
SUPERVISOR zuganglich ist ('continue (32)'). 

new type 

PROC new type (TEXT CONST typ) 

Zweck: Erdffnet einen neuen Kanaltyp mit dem Namen 'typ'. Die folgenden 
Aufrufe von 'enter outcode', 'enter incode' usw. beziehen sich dann 
auf diesen Typ. 

enter outcode 

PROC enter outcode (INT CONST eumelcode, zielcode) 
Zweck: Legt fest, daB der Code 'eumelcode' bei Ausgabe auf dem Termt- 
naltyp in 'zielcode' gewandelt werden soli. 

PROC enter outcode (INT CONST eumelcode, TEXT CONST zeichen) 
Zweck: Wirkt wie 'enter outcode (eumelcode, code (zeichen))'. 

PROC enter outcode (INT CONST eumelcode, zeit, TEXT CONST seq) 
Zweck: Hiermit wird festgelegt, daB der Code 'eumelcode' als Mehrzeichen- 
folge 'seq' ausgegeben werden soli. Jedesmal, wenn diese Folge 
ausgegeben wurde, verz&gert das System die Ausgabe des nachsten 
Zeichens urn mindestens 'zeit' Millisekunden. Dies wird z.B. von den 
meisten Terminals gefordert, wenn sie die Funktion 'Lose hen Bikl— 
schirm' ausfuhren sollen. 

enter incode 

PROC enter incode (INT CONST eumelcode, TEXT CONST seq) 
Zweck: Es wird festgelegt, daB eine Eingabezeichenfolge 'seq' an das 
System als ein (I) Zeichen mit dem Code 'eumelcode' weitergegeben 
werden soli. Die ganze Sequenz muB dabei innerhalb von ca. 40 
Millisekunden eintreffen, andemfalls werden die Zeichen einzeln 
gemeldet Diese Logik ist erforderlich, urn auch Terminals anzu- 
schlieBen, die z.B. Cursortasten als ESC - Sequenzen melden. Ohne 
die Zerruberwachung wurde das Betatigen der ESC -Taste sonst die 
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Eingabe blockieren, bis die Folge 'seq' vollstdndig ist. 

Folgende Eumelcodes sind fur die Sondertasten (SV usw.) anzuge- 

ben: 



17 STOP 

23 WEITEH 

4 INFO 

7 SV 



Weitere Codes ('HOP',...) sind im Benutzerhandbuch Version 1.7 
Seite 110 angegeben. 



cursor logic 

PROC cursor logic (INT CONST offset, TEXT CONST pre, mid, post) 
Zweck: Es wird festgelegt, dafl der EUMEL-Code 6 (Cursorposition) mit den 
folgenden beiden Zeichen, deren Codes y und x sei, als 

pre + code (offset + y) + mid + code (offset + x) + post 

ausgegeben wird. 

Hinweis: 'offset' 1st ublicherweise 32 (manchmal 0) und mid - 
post»"". 



elbit cursor 

PROC elbit cursor 

Zweck: Diese Prozedur ist bei Elbit - Terminals anstelle von 'cursor logic' zu 
verwenden. 



baudrate 

PROC baudrate (INT CONST channel, rate) 

Zweck: Die serielle Schnittstelle des angegebenen KanaJs wird auf die 
angegebene Baudrate eingestellt. Diese Prozedur muB nicht bei alien 
Rechnertypen vorhanden sein. 

bits 

PROC bits (INT CONST channel, number, parity) 

Zweck: Die serielle Schnittstelle des angegebenen Kanals wird auf 'num- 
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ber' - Bits (7 Oder 8) und die angegebene Paritat eingestellt. Dabei 
bedeutet 

0 : no parity 

1 : odd parity 

2 : even parity 

Diese Prozedur muB nicht auf alien Rechnertypen vorhanden sein. 

flow 

PROC flow (INT CONST channel, type) 

Zweck: Die FluBkontrolle des angegebenen Kanals wlrd auf 'type' eingestellt: 

0 : keine FluBkontrolle 

1 : RTS/CTS (Pin 4 und 5) 

2 : XON/XOFF-Protokoll 



Beisplele fur die Verwendung von 'new type', 'enter outcode', 'enter Incode', 
'cursor logic' und 'elbit cursor' findet man in den "...gen" Oateien auf dem Archiv 
"conf". 



Konf igurations - Manager 



Wenn das System gestartet wird, weiB der Urlader noch nicht, welche Terminalty- 
pen an welchen Kanalen hangen. (Der Vortest kann deshalb auch nicht bildschirm- 
orientiert arbeiten). 

Falls eine Task 'configurator' im System ist, schlckt der SUPERVISOR dieser elne 
Startsendung (Code 100) zu. Diese Task kann daraufhin die ndtigen Konfigurier- 
kommandos ('link',...) ausfuhren. 

Der standardmaBig ausgelieferte Konfigurations - Manager fuhrt nur 'link' - Opera- 
tionen durch. Falls weitere dynamische Operationen ('baud', 'bits', 'flow') notwen- 
dig werden, muB man inn entsprechend modifizieren. Der Ouellcode des entspre- 
chenden Pakets beflndet sich auf dem "conf" - Archiv. 
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1. Wertebereiche und Speicherbedarf 



INT-Objekte 



Jedes Oatenobjekt vom Typ INT belegt 2 Bytes Im Speicher. Mogliche INT-Werte 
sind die ganzen Zahlen von -32768 bis +32767 elnschlieBlich. 



REAL-Objekte 



Jedes Datenobjekt vom Typ REAL belegt 6 Bytes im Speicher. 

REALS haben eine 13-stellige Mantissa, die dezimai im Rechner gefOhrt wird. 
(Das heiBt, bei Konversionen zwischen intemer und TEXT - Oarstellung treten keine 
Rundungsfehler auf.) Der Wertebereich laBt sich durch einige Eckwerte verdeutli- 
chen: 

9.9999999999996-1-126 groflte REAL 

0.000000000001 kleinste positive REAL mit x+ 1.0 > 1.0 

9.9999999999996-126 kleinste positive REAL > 0.0 
-9.999999999999e-126 grdBte negative REAL 
- 9.9999999999996 + 126 kleinste REAL 
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BOOL-Objekte 



Jedes Datenobjekt vom Typ BOOL belegt 2 Bytes im Speicher. 



TEXT-Objekte 



Jedes Datenobjekt vom Typ TEXT besteht aus einem fasten Teil von 16 Bytes und 
mdgllcherweise aus einem flexiblon Teil auf dem Hasp. Im fasten Tell werden 
Texte bis zur Lange von 13 Zeichen untergebracht. Wenn eine TEXT - Variable 
einen Wert mit mehr als 13 Zeichen Lange annimmt, werden alle Zeichen auf dem 
Heap untergebracht. Genauer ergibt sich folgendes Bild: 

kurzer Text (LENGTH < - 13): 

Heap - Link 2 Bytes 
Textlange 1 Byte 
Text 13 Bytes 

langer Text (LENGTH > 13): 

Heap -Link 2 Bytes 

255 1 Byte 

Lange 2 Bytes 

ungenutzt 11 Bytes 

Wenn eine Variable einmal Platz auf dem Heap bekommen hat, be halt sie diesen 
vorbeugend auch dann, wenn sle wleder einen kurzen Text als Wert erhalt. So 
muB wahrscheinlich kein neuer Platz auf dem Heap zugewiesen werden, wenn sie 
wieder langer wird. Das gilt allerdings nur bis zur nachsten Garbage Collection auf 
den TEXT -Heap, denn dabei werden alle Heap - Container minimal gemacht bzw. 
geloscht, wenn sie nicht mehr benotigt werden. Der Platz auf dem Heap wird in 
Vielfachen von 16 Bytes vergeben. In Fremddatenraumen wird in jedem Container 
neben dem eigentlichen Text auch die Containeriange untergebracht. 
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Beispiele: TEXT -Lang© Speicherbedarf (Byte) 



0 


lb 


13 


16 


14 


32 


15 


48 


30 


48 


31 


64 


46 


64 


47 


80 


62 


80 



ROW- und STRUCT -Objekte 



Bei der Berechnung des Speicherbedarfs von STRUCTs und HOWs muB man 
bedenken, daB langere Oatenobjekte ausgerichtet werden. Und zwar warden alle 
Objekte, die mindestens die Lange eines REAL - Objektes haben, auf durch 8 
teilbare Speicheradressen ausgerichtet. Man bedenke, daB bei ROWs alle Ele- 
mente entsprechend ihres Elementtyps ausgerichtet sind. 



Beispiele: Lange (Byte) 

ROW 4 INT 8 

ROW 5 INT 16 

ROW 100 STRUCT (INT.INT) 400 

ROW 100 STRUCT (INT.REAL) 1600 

ROW 100 STRUCT (INT.INT,INT,INT,REAL) 1600 

ROW 100 STRUCT (REAL, REAL) 1600 

ROW 100 STRUCT (INT.TEXT) 2400 

ROW 100 STRUCT (INT.INT.INT.INT.TEXT) 2400 

ROW 100 STRUCT (INT.TEXT, INT.TEXT) 4800 

ROW 100 STRUCT (INT.INT.TEXT.TEXT) 4000 

ROW 100 ROW 3 INT 600 

ROW 100 ROW 4 INT 800 

ROW 100 ROW 5 INT 1600 

aber: 

ROW 500 INT 1000 



EUMEL - Systemhandbuch 



Bei der Speichervergabe der einfachen Variablen und Konstanten 
eines Programms spielen Veiiuste aufgnind von Aushchtungen in der 
Regel keine Rolle. Der ELAN - Compiler optimiert dabei soweH 
mdglich. 
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Teil 4: Standardpakete fur 
Systemprogrammierer 

1. Fehlerbehandlung 



Ubersicht 

Fehler treten auf, wenn ein Programm eine gewunschte Lei- 
stung nicht arbringen kann. Solche Sltuationen mussen von 
System - Programmen kontrolliert behandett werden. Die foh 
genden Ausfuhrungen sind somit nur fur diejenigen interes- 
sant, die "System" - Programme schreiben wollen. 

Fehler treten in Operationen auf, wenn diese eine geforderte Leistung nicht er- 
bringen konnen (z.B. Drucken einer nicht vorhandenen DateO. Da folgende An- 
weisungen aber davon ausgehen, dafl die gewunschten Leistungen erbracht wur- 
den, ist es nicht sinnvoll, die Operation weiter auszufuhren. Wir sprechen vom 
Abbruch einer Operation, wenn nach einem Fehler keine Anweisungen mehr aus- 
gefuhrt werden, sondem die Operation verlassen wird. Im EUMEL- System kann 
durch folgende drei MaBnahmen ein Abbruch verursacht werden: 

- Aufruf der Prozedur 'errorstop': 
Die Operation wird mit einer Fehlermeldung abgebrochen, die man dem Aufruf 
von 'errorstop' beifugen muB. 

-Aufruf der Prozedur 'stop': 
Die Operation wird abgebrochen. Wirkt wie 'errorstop' mit der Meldung "stop". 

-Umschalten in den Supervisor: Durch BetAtigen der Taste SV und dem 
Kommando 'halt'. Das laufende Operation wird abgebrochen. Wirkt wie ein 'er- 
rorstop', der von "auBen" in das Programm induziert wird. 
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Da alle drei MaBnahmen zum Abbruch fuhren k&nnen und somit eine anomala 
(vorzeitige) Beendigung einer Operation bewirken, warden sie im folgenden zu- 
sammenfassend als Fehler bezeichnet. 

Fur solche Fehler bietet das EUMEL -System die Moglichkeit, den Abbruch zu 
unterdrucken. Dies kann notwendig warden, wenn 

a) bestimmte Fehlerfa/le vom aufrufenden Programm selbst behandelt werden 
sollen. Beispiei: 

Der EUMEL - Editor wird aufgerufen, um eine Datei zu editieren. Er versucht als 
erstes, die Datei zu asseziieren. Existiert die Datei nicht, wird die Prozedur 
(z.B. 'old'), mit der die Datei angemeldet werden soli, normalerweise mit der 
Fehlermeldung 'file does not exist' abgebrochen. Diesen Fehlerzustand fangt 
der Editor jedoch ab und versucht, eine neue Datei einzurichten. (Anmerkung: 
der Editor fragt nafurllch vor der Assoziierung mit 'exists' ab, ob die Datei exi- 
stiert). 

b) eine Operation die Kontrolle auf jeden Fall behalten soil. 

Dies ist z.B. beim Monitor, notwendig. Gleich welche Fehler vom Monitor geru- 
fene Programme produzleren, der Monitor muB in der Lage sein, die weltere 
Bearbeltung zu ermogllchen. 

c) eine Operation nicht unterbrechbar sein darf. 

Beispielsweise durfen Programm(teile), die Daten transportieren, nicht unter- 
brochen werden, da sonst ein Verlust dieser Daten eintreten kdnnte. 

Fehlerbehandlung und Fangerebenen 



Der Aufruf einer der Prozeduren 

errorstop 

stop 

halt 
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(wobei letztere vom Supervisor gegeben werden muB) werden zusammenfassend 
als Fehler bezeichnet. Bei einem Fehler wird ein Fehlerzustand gesetzt. Im Feh- 
lerzustand merkt sich das EUMEL - System, da8 ein Fehler vorliegt. Die Prozedu- 
ren 

enable stop 
disable stop 

bestimmen, ob Operationen im Fehlerzustand weiter bearbeitet Oder abgebrochen 
werden. Beispiel: 

INT VAR x; 
get (x); 

disable stop; 
x :« x " x; 



Hier wird mit 'disable stop' verhindert, daB ein Abbruch beisplelsweise durch 'INT 
overflow' auftreten kann. Die Anweisungen nach 'x ' x' werden also weiter bear- 
beitet. 

Welchen Wert hat aber nun die Variable 'x', nachdem der Fehler auftrat? Offen- 
sichtlich war die den Fehler auslosende Operation '*' nicht in der Lage, den rich- 
tigen Wert zu errechnen. Abgebrochene Opecatkonen liefem in der Regel keinen 
Wert. Dadurch ist der Wert von V in unserem Beispiel nach einem Fehler bei '*' 
undefiniert. Es ist nun ersichtiich, daB mit der Anwendung der 'disable stop' - 
Prozedur auBerst vorsichtig zu verfahren ist, weil u.U. Werte verloren gehen 
k&nnen bzw. mit unerwarteten Werten weitergerechnet wird. 

Damit Programmierer erfahren kfinnen, ob ein Fehler aufgetreten ist, gibt es die 
Informations - Prozedur 

is error 

uber den Fehlerzustand. Die Prozedur liefert den Wert TRUE, wenn ein Fehler 
vorliegt, andemfalls FALSE. Die Prozedur 



clear error 
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"Idscht" den Fehlerzustand, d.h. anschlieBende Abfragen mit 'is error' Hefem 
FALSE. (Die "richtige" Reaktion auf den Fehler muB ein Programmierer naturlich 
selbst bestfmmen.) Beispiel: 

INT VAR x; 
get (x); 

disable stop; 
x x " x; 
IF is error 
THEN put ("x'-wert zu gross"); 

x :- 0; 

clear error 

Fl; 

Lelder wurden jetzt aber auch alle folgenden Anweisungen bei eventuellen Fehlem 
nicht abgebrochen, also auch in Situationen, in denen ein Abbruch erwunscht ist, 
um Programmierfehler zu erkennen. Oeshalb konnen durch 

enable stop 

Abbruche wleder zugelassen werden. Wenn wir jetzt also schreiben: 

INT VAR x; 
get (x); 

disable stop; 
x : - x ' x; 
IF is error 
THEN put ("V - wert zu gross"); 

x :- 0; 

clear error 

Fl; 

enable stop; 

dann wurden - wie gewunscht - eventuelle Fehler in den Anweisungen nach 
'enable stop' zu einem Abbruch fuhren. 
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Nicht mit 'clear error' geloschte Fehler fuhren bei 'enable stop' ebenfalls zu einem 
Abbruch. In dem Programmteil 



disable stop; 
x : » x * x; 
enable stop; 



wurde der eventuell auftretender Fehler 'INT overflow' nicht abgefangen, sondem 
nur verzogert wirksam, weil er nicht mit 'clear error' geloscht wurde. 

Fur die Behandlung von Fehlern durch Benutzer gibt es Prozeduren, die eine 
adequate Reaktion auf den Fehler erlauben. Mit 

error message 

kdnnen Sie auf die letzte Fehlermeldung (eines 'error stop's) zugreifen. Die Pro- 
zedur 

error code 

llefert den Fehlercode, der bei der Prozedur 'errorstop' zusatzlich zum Fehlertext 
angegeben werden kann (zu der Festlegung von Fehlercodes vergl. S. 43). 

error line 

liefert die Zeilennummer des zuletzt aufgetretenen Fehlers. Mit 
put error 

kann eine noch anstehende Fehlermeldung ausgegeben werden. Beispiel: 
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INT VAR x; 
get (x); 

disable stop; 
x : » x " x; 
IF is error 

THEN IF error message - "INT overflow" 
THEN put ("V - wert zu gross"); 
ELSE put error 
Fl; 

clear error 

Fl; 

enable stop; 



Tritt ein Fehler auf, so wird die den Fehler ausldsende Operation entweder abge- 
brochen Oder "normal" weiter bearbeitet, je nachdem, ob 'enable stop' Oder 'dis- 
able stop' gesetzt ist. Auf Jeden Fall wird der Fehlerzustand an die aufrufende 
Operation weitergemeldet, die wiederum abgebrochen oder weiterbearbeitet 
werden kann usw. Die Weitermeldung eines Fehlers uber die Aufrufkette zuruck 
kann auch uber mehrere Stufen erfolgen, bis der Fehler geldscht wird. Anderer- 
seits gilt 'enable/ disable stop' nicht nur fur die aktuelle Operation, sondem auch 
fur gerufene Operationen ("Vererbung"). Die gerufenen Operationen konnen aller- 
dlngs 'enable/disable stop' neu festlegen. Beispiel: 



PROC a: 



PROC b: 
enable stop; 

c; 



disable stop; 
b; 

IF is error 
THEN ... 

clear error END PROC b 

Fl; 

enable stop 
END PROC a; 



PROC c. 

POW 10 INT VAR x; 

INT VAR i :: 4711; 
x[i):= 

END PROC c 



In der Prozedur 'a' wird die Prozedur 'b' aufgerufen. Diese ruft wiederum eine 
Prozedur 'c' auf. Fur die Prozedur 'c' gilt nun der Zustand 'enable stop' der 
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Prozedur 'b' (Vererbung von 'enable stop'). Tritt jetzt in 'c' der Subskriptions - 
Fehler au(, wird 'c' abgebrochen. Die Wirkung der Fehler auslosenden Operation 
ist nicht definiert. 

Da aber auch die Prozedur 'b' im 'enable stop' Zustand ist, wird auch die Proze- 
dur 'b' abgebrochen. Der Fehler bleibt jedoch erhalten, wird also weitergemeldet. 
Dies wirkt sich so aus, daB die Anweisung 'd' nicht ausgefuhrt wird. Da die Pro- 
zedur 'a' 'disable stop' gesetzt hat, werden die auf den Aufruf von 'b' folgende 
Anweisungen durchlaufen und somit durch 'clear error' der Fehler gel6scht. In 
diesem Beispiel "fangt" die Prozedur 'a' Fehler auf, die in den Prozeduren 'b' und 
'c' entstehen kSnnen. 

Ein solcher Fanger wird durch zwei Prozeduren konstruiert. Der eigentliche Finger 
(hier: Prozedur 'a') ruft elne ausfuhrende Prozedur (hier: 'b') im 'disable stop'- 
Zustand auf. Die gerufene Prozedur setzt sofort 'enable stop' und fuhrt dann die 
eigentllchen Aktionen aus. So wird die gerufene Prozedur abgebrochen (kann also 
im Fehlerfall nicht zuviel Schaden anrichten). Der Abbruch fuhrt bis zur Fanger- 
prozedur ('a') hinter den Aufruf der gerufenen Prozedur fb'). Nach Ldschung 
eventuell auftretender Fehler ist somit slchergestellt, daB der Fanger immer weite- 
rarbeiten kann. 

Wichtiger Hinweis 



Da im 'disable slop' Zustand kein Fehler zum Abbruch tOhrt, 
kann eine Operation in diesem Zustand auch nicht durch 'halt 
abgebrochen werden. SnersoRs ist das fOr manche System- 
tette wunschenswert, andererseUs kSnrten Operationen, die auf 
Grind von Programmlerionlem nicht tarminiewn (Endtos- 
schleifen). nicht unter KontroUe gebracht werden. Also Vor- 
sicMf fLetztes Mktel: Task Idechen) 
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Merke: Fehler sind Hn EUMEL -System Aufrufe der Prozeduren 'er- 
rorstop'. 'stop' odor das Bet&tigen der SV Taste und das Su- 
pervisor -Kommando 'halt'. En FeNer gilt solange, bis er mi 
Wife der Prozedur 'dear error' gekSecht wurde. Die Prozedu- 
ren 'enable/disable stop' steuem die Abarbehung der Opera- 
bonen kn FehlerfaS. Gilt Kir sine Operation 'enable stop', wird 
die Operation abgebrochen, d.h. die restHchen Anwetsungen 
der Operation nach der Fehler ausUsenden Anweisung wer- 
den nicht durchlaufen. 1st 'disable stop' gesetzt, werden die 
restHchen OperaOonen weHarhin abgearbehet 'enable/disable 
stop' fur ate - auch indirekt - autgerufenen OperaHonen 
('Vererbung"), as set derm, in den gerufenen OperaOonen wird 
ain emeutee 'anabte/dlaable atop' gesetzt Ubar die Autruf- 
kette werden ggf. auch die Fehler zuriick game/del 

Elite Fangar-Ebene ist ekte Prozedur, die 'disable stop' seta 
und derm andere Operabonen aufrufL Nach jedem dieser Auf- 
rufe karm eine Fehiorbehandlung mit 'dear error' durchgefuhrt 
werden. OamH ist gew&hneistet, daB Fehler armor yon der 
Finger- Ebene 'autgefangen" und adaquat behartdelt werden. 



Prozeduren zur Fehiorbehandlung 



clear error 

PROC clear error 

Zweck: Loscht den Fehlerzustand. 'is error' liefert anschlieBend wieder 
FALSE, 'error message', 'error code' und 'error line' werden nicht 
gel6scht. 

disable stop 

PROC disable stop 

Zweck: Unterbindet den Abbruch in autgerufenen Operationen. 'disable stop' 
gilt fur die Prozedur, in der sie aufgerufen wird und in alien folgenden 
gerufenen Prozeduren. Es sei denn, sie wird durch 'enable stop' 
auBer Kraft gesetzt. Wird die Operation veriassen, in der 'disable 
stop' aufgerufen wurde, wird der "arte" Zustand wiederhergestellt, 
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der vor dem Aufruf der Operation gait, 'disable stop' Kann weiterhin 
in einer aufgerufenen Operation durch den Aufruf von 'enable stop' in 
dieser und den folgenden Operationen auBer Kraft gesetzt werden. 



enable stop 

PROC enable stop 

Zweck: Setzt die Wirkung eines Aufrufs von 'disable stop' zuruck. Fehler 
('errorstop'. 'stop' Oder 'halt') in der aktuellen Operation oder den 
folgenden aufgerufenen Operationen fuhren zum Abbruch. Bisher 
nicht geloschte Fehler (slehe 'clear error') fuhren sofort zum Ab- 
bruch. 



error code 

INT PROC error code 

Zweck: Liefert den durch 'errorstop' gesetzten Fehlercode. Beispiel: 
PROC test: 
enable stop; 

error stop (110, "Dies ist mein Abbruch!"); 
END PROC test; 



disable stop; 
test; 

put (error code); (' liefert 110 ") 
clear error; 
enable stop 



error line 

INT PROC error line 

Zweck: Liefert die Zeilennummmer des Fehlers. 



error message 

TEXT PROC error message 

Zweck: Liefert die Fehlermeldung als Text. An Hand dieser Meldung kann 
entschieden werden, welcher Fehler vorliegt. Hinweis: 
Eine Fehlermeldung "" (also: 'error stop ("")') fuhrt zum Fehlerab- 
bruch mit der Bedeulung Fehlermeldung wurde bereits ausgegeben 
Dementsprechend erfolgt bei der Fehlermeldung 'niltext' keine Reak- 
tion bei 'put error'. 
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errorstop 

PROC error stop (TEXT CONST message) 

Zweck: Bricht ab und setzt die Zellennummer, in der der Fehler aufgetreten 
ist, sowie den Text 'message'. Der Abbruch kann mit 'disable stop' 
unterbunden werden. 'errorstop' hat keine Wirkung, wenn ein noch 
nicht geloschter Fehler vorliegt. Zu einer Fehlermeldung "" siehe 
auch die Prozedur 'error message'. 

PROC error stop (INT CONST code, TEXT CONST message) 

Zweck: Analog obiger 'errorstop' - Prozedur, aber mit Angabe des Fehlercc— 

des, der durch die Prozedur 'error code' in einer Fangerebene erfragt 

werden kann. 



BOOL PROC is error 

Zweck: Informationsprozedur auf das Vorhandensein eines Fehlers. 

put error 

PROC put error 

Zweck: Qibt die durch 'errorstop' gesetzte Fehlermeldung aus, falls eln 
Fehler noch nicht geldscht ist. 



Fehlercodes 



Einige Fehlercodes sind bereits belegt: 



is error 



0 



kein Fehlercode spezifiziert 

halt from terminal 

stack overflow 

heap overflow 

INT overflow 

DIV by 0 

REAL overflow 

TEXT overflow 

too many DATASPACEs 

subscript overflow 



2 
3 
4 
5 
6 
7 
S 
9 
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10 
11 
12 
13 
14 
15 
16 
17 
100 



subscript underflow 

alias error at dataspace access 

undefined INT 

undefined REAL 

undefined TEXT 

storage overflow 

code block unreadable 

wrong opcode 

Syntax - Fehler beim Ubersetzen 



2. THESAURUS 



Ein Thesaurus ist ein Namensverzeichnis, das bis zu 200 Namen beinhalten kann. 
Dabei muB jeder Namen mindestens ein Zeichen und darf hochstens 100 Zeichen 
lang sein. Steuerzeichen (code < 32) sind in Namen nicht eriaubt. 

Ein Thesaurus ordnet jedem elngetragenen Namen einen Index zwischen 1 und 
200 (einschlieBlich) zu. Diese Indizes bieten dem Anwender die Moglichkelt, 
Thesauri zur Verwaltung benannter Objekte zu verwenden. (Der Zugriff erfolgt dann 
uber den Index eines Namens in einem Thesaurus). So werden Thesauri u.a. von 
der Dateiverwaltung benutzt. Sle bilden die Qrundlage der ALL- und SOME- 
Operatoren. 



Qrundoperationen 



THESAURUS 

TYPE THESAURUS 

Zweck: Bezeichnet Thesaurus - Datenobjekte 
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OP : - (THESAURUS VAR dest, THESAURUS CONST source) 
Zweck: Zuweisung 

CONTAINS 

BOOL OP CONTAINS (THESAURUS CONST t, TEXT CONST name) 
Zweck: Liefert genau dann TRUE, wenn 't' den Namen 'name' enthalt. Falls 
'name Oder 'LENGTH name > 100", wird FALSE geliefert. 

delete 

PROC delete (THESAURUS VAR t, TEXT CONST name, INT VAR index) 
Zweck: Fall der Name 'name' Im Thesaurus T enthalten ist, wird er dort ge- 
loscht. In 'index' wird dann sein alter Index geliefert, unter dem er im 
Thesaurus eingetragen war. Ist der Name nicht im Thesaurus enthal- 
ten, wird 0 als Index geliefert. 

PROC delete (THESAURUS VAR t. INT CONST Index) 
Zweck: Der Eintrag mit dem angegebenen Index wird aus dem Thesaurus Y 
geloscht. 

empty thesaurus 

THESAURUS PROC empty thesaurus 

Zwech: Fur Initialisierungszwecke wird ein leerer Thesaurus geliefert. 

get 

PROC get (THESAURUS CONST t, TEXT VAR name. INT VAR index) 
Zweck: Liefert den "nachsten" Eintrag aus dem Thesaurus 't'. "Nachster" 
heiBt hier, der kleinste vorhandene mit elnem Index groBer als 'in- 
dex'. Dabei wird in 'name' der Name und in 'index' der Index des 
Eintrags geliefert. D.h. 'index' wird automatisch weitergeschaftet. Den 
ersten Eintrag erhalt man entsprechend durch Aufruf mit 'index -0'. 
Nach dem letzten Eintrag wird 'name = und 'index = 0' geliefert. 
Beispiel: 

TEXT VAR name; 

INT VAR index : => 0 ; 

get (thesaurus, name, index) ; 

WHILE index > 0 REP 

putline (name) ; 

get (thesaurus, name, index) 
PER 
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highest entry 

INT PROC highest entry (THESAURUS CONST t) 

Zweck: Liefert den hochsten beiegten Index des Thesaurus 't'. 

Achtung: Das ist nicht die Aruahl der vorhandenen Namen, da durch 
Loschungen Lucken entstanden sein kdnnen. 

insert 

PROC insert (THESAURUS VAR t, TEXT CONST name. INT VAR index) 
Zweck: Der Name 'name' wird als zusatzlicher Eintrag in den Thesaurus 'f 
eingetragen und der dafur vergebene Index geliefert. Falls der The- 
saurus schon voll ist und der Name nicht mehr eingetragen werden 
kann, wird 0 als Index geliefert. 

Achtung: Mehrfacheintragurtgen slnd mdglich. Wenn man dies© ver- 
hindem will, muB man entsprechend vermittels 

IF NOT t CONTAINS name 
THEN Insert (t, name, index) 

Fl 

eintragen. 

FehlerfaJI: 

' invalid name 

PROC insert (THESAURUS VAR t, TEXT CONST name) 

Zweck: s.o. Allerdings wird der Index des Namens nicht geliefert. Ein The- 

saurusuberlauf wird entsprechend als 'errorstop' gemeldet. 
Fehlerfalle: 

' invalid name 

' thesaurus overflow 

link 

INT PROC link (THESAURUS CONST t, TEXT CONST name) 
Zweck: Liefert den Index des Namens 'name' Im Thesaurus T. Falls der 
Name nicht enthalten ist, wird 0 geliefert. Ist der Name mehrfach im 
Thesaurus enthalten, ist nicht definlert, welcher der mOglichen Indi- 
ces geliefert wird. 
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name 

TEXT PROC name (THESAURUS CONST t, INT CONST index) 
Zweck: Liefert den Namen des Eintrags mit dem Index 'index' aus dem The- 
saurus 't'. Falls kein solcher Eintrag im Thesaurus enthalten ist, wird 
Niltext geliefert. 

rename 

PROC rename (THESAURUS VAR t, TEXT CONST old, new) 
Zweck: Andert im Thesaurus 't' einen Eintrag mit dem alten Namen 'old' In 
'new' urn. Falls 'old' nicht im Thesaurus enthalten ist, wird keine 
Leistung erbracht. Falls 'old' mehrfach in 't' enthalten ist, ist nicht 
definiert, welcher der mdglichen Eintrige geandert wird. 
Fehlerfall: 

' invalid name 

PROC rename (THESAURUS VAR t, INT CONST index, TEXT CONST new) 
Zweck: Andert im Thesaurus 't' den Namen des durch 'index' identifizierten 

Eintrag in 'new'. 
Fehlerfall: 

* invalid name 



Verknupfungsoperationen 



Das Paket 'nameset' bietet die Moglichkeit, Operationen nicht nur auf einzelnen 
Oateien, sondem auf (geordneten) Mengen ablaufen zu lassen: 

ALL 

THESAURUS OP ALL (TASK CONST task) 

Zweck: Liefert einen Thesaurus, der alle Dateinamen der angegebenen Task 
(auch 'myself') enthait. 

THESAURUS OP ALL (TEXT CONST file name) 

Zweck: Liefert einen Thesaurus, der die in der angegebenen Datei vorhan- 
denen Namen (jede Zeile ein Name) enthait. 



TEIL 4: Standardpakete fur Systemprogrammierer 



49 



all 

THESAURUS PROC all 

Zweck: Liefert einen Thesaurus, der alle Dateinamen der eigenen Task ent- 
halt. Entspricht 'ALL myself'. 

SOME 

THESAURUS OP SOME (THESAURUS CONST thesaurus) 
Zweck: Bietet den angegebenen Thesaurus zum editieren an. Dort kflnnen 
nlcht erwunschte Namen gestrichen werden. 

THESAURUS OP SOME (TASK CONST task) : SOME ALL task 

THESAURUS OP SOME (TEXT CONST file name) : SOME ALL file name 

+ 

THESAURUS OP + (THESAURUS CONST left, right) 
Zweck: Liefert die Vereinigungsmenge von 'left' und 'right'. 

Achtung: Die Vereinigungsmenge enthalt keine Namen mehrfach. 

THESAURUS OP - (THESAURUS CONST left, right) 

Zweck: Liefert die Differenzmenge. Achtung: Die Differenzmenge enthalt 
keine Namen mehrfach. 

/ 

THESAURUS OP / (THESAURUS CONST left, right) 
Zweck: Liefert die Schnlttmenge 

Achtung: Die Schnittmenge enthalt keine Namen mehrfach. 

do 

PROC do (PROC (TEXT CONST) operate, THESAURUS CONST thesaurus) 
Zweck: Ruft 'operate' nacheinander mit alien im Thesaurus enthaltenen 
Namen auf. 

PROC do (PROC (TEXT CONST, TASK CONST) operate, 

THESAURUS CONST thesaurus, TASK CONST task) 
Zweck: s o. 
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fetch 

PROC fetch (THESAURUS CONST thesaurus) 
Zweck: Holt alle aufgefuhrten Oateien vom Voter. 

PROC fetch (THESAURUS CONST thesaurus, TASK CONST manager) 
Zweck: Holt alle aufgefuhrten Datelen vom 'manager'. 

save 

PROC save (THESAURUS CONST thesaurus) 

Zweck: Schickt alle aufgefuhrtren Datelen zur Vater-Task. 

PROC save (THESAURUS CONST thesaurus, TASK CONST manager) 
Zweck: s.o. 

forget 

PROC forget (THESAURUS CONST thesaurus) 

Zweck: Ldscht alle aufgefuhrten Dateien in der Benutzer - Task. 

erase 

PROC erase (THESAURUS CONST thesaurus) 

Zweck: Ldscht alle aufgefuhrten Dateien in der Vater - Task. 

PROC erase (THESAURUS CONST thesaurus, TASK CONST manager) 
Zweck: Ldscht alle aufgefuhrten Dateien in der 'manager' -Task. 

insert 

PROC insert (THESAURUS CONST thesaurus) 

Zweck: Insertion alle aufgefuhrten Dateien In der Benutzer - Task. 

fetch all 

PROC fetch all (TASK CONST manager) 
Zweck: Holt alle Dateien vom 'manager'. 

save all 

PROC save all (TASK CONST manager) 

Zweck: Schickt alle eigenen Datelen zum 'manager'. 
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Beispiele: 

save (ALL myself) 

forget (ALL myself) 

fetch (SOME father) 

fetch (ALL father - ALL myself) 

insert (ALL "gen datei") 

fetch (ALL myself - ALL archive, archive) 



3. Kommandos und Dialog 



Kommandodialog 



Das Paket "command dialogue" dient zur zentralen Steuerung und einfachen 
Durchfuhrung von Kommando - Dialogen wie 

"datei" loeschen (|m)7 

Er wird von alien Systemteilen verwandt, die einen Kommandodialog mit dem 
Benutzer aufnehmen. Anwenderprozeduren mit ahnlichen Problemen solltan 
genauso damit arbeiten. 

Der Kommandodialog kann zentral aus- und eingeschaltet warden. Zusatzlich ist 
er temporar ausgeschaltet, wenn kein Terminal angekoppelt ist. 



command dialogue 

BOOL PROC command dialogue 

Zweck: Liefert den aktuellen Zustand des Kommandodialogs: 
TRUE - Dialog soil gefuhrt werdenl 
FALSE - Dialog soil nicht gefuhrt werdenl 
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PROC command dialogue (BOOL CONST status) 

Zweck: Schaltet den Kommandodialog ein ('status' « TRUE) oder aus ('sta- 
tus' « FALSE). Der arte Zustand wir Gberschrieben. Soil spater wie- 
der in den alien Zustand zuruckgeschaltet werden, muB er vorher 
erfragt und gesichert werden. 

yes 

BOOL PROC yes (TEXT CONST question) 
Zweck: a) command dialogue — > TRUE 

Der ubergebene Fragetext wird durch " (j/n)?" erganzt auf dem 
Terminal ausgegeben. Als Antwort wird eine der Tasten < j > , 
<J>, < y > , <Y>, <n>, < N > akzeptiert; jede andere Eingabe 
fuhrt zu einem akustischen Signal und der Fragewiederholung. 
Das Resultat der Prozedur ist 

TRUE bei bejahender Antwort (j.J.y.Y) 
FALSE bei verneinender Antwort (n,N) 
b) command dialogue — > FALSE 
Keine Aktion, das Resultat ist TRUE. 

no 

BOOL PROC no (TEXT CONST question) 
Zweck: a) command dialogue — > TRUE 

Frage und Antwort wie bei 'yes'. Das Resultat ist 
TRUE bei verneinender Antwort (n,N) 
FALSE bei bejahender Antwort (j.J.y.Y) 
b) command dialogue — > FALSE 
Keine Aktion, das Resultat ist FALSE. 

say 

PROC say (TEXT CONST message) 

Zweck: IF command dialogue THEN out (text) Fl 

last param 

TEXT PROC last param 

Zweck: Liefert den zuletzt gesetzten Parameter - Text (siehe folgende Pro- 
zedur). Falls 'command dialogue' - TRUE und die 'param position' 
> 0 ist, wird der Parametertext als Standardparameter an der ange- 
gebenen x- Position eine Zeile honor in der Form ("...") ausgegeben. 
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Diese Prozedur wird von den parameterlosen Kommandos bzw. 
Prozeduren wie 'edit', 'run' usw. verwandt, um mit dem Standardpa- 
rameter weiterzuarbeiten. 

PROC last param (TEXT CONST new) 

Zweck: Setzt 'last param' auf 'new'. (Das Setzen muB explizit durchgefuhrt 
warden und geschieht nicht implizit durch den 'command handler' 
(s.dort)l) 'Last param' wird beispielsweise von den einparametrigen 
Prozeduren 'edit' und 'run' gesetzt. 

param position 

PROC param position (INT CONST x) 

Zweck: Setzt die Echopositlon fur 'last param'. Bel x-0 wird eln Echo un- 
terdruckt. 

std 

TEXT PROC std 

Zweck: Liefert wie 'last param' den zuletzt gesetzten Parameter. Im Gegert- 
satz dazu wird der Parameter aber nicht ausgegeben. 



Kommandoverarbeitung 



Das Paket 'command handler' stellt Prozeduren zur Kommandoanalyse und zum 
Fuhren des kompletten Kommandodialogs zur Verfugung. 



get command 

PROC get command (TEXT CONST dialogue text, TEXT VAR command line) 
Zweck: Falls eine Fehlermeldung aussteht, ('is error' liefert TRUE), wird sie 
uber 'put error' ausgegeben und der Fehlerzustand zuruckgesetzt. 
Der 'dialogue text' wird als Dialogaufforderung ausgegeben und der 
Benutzer kann eine Kommandozeile eingeben. Die letzte Komman- 
dozeile wird ihm dabei automatisch (zum Editieren) angeboten, wenn 
vorher eine Fehlermeldung anstand. Der Benutzer kann das auch 
sonst erreichen, wenn er zu Beginn < ESC k > gibt. Die Kommando- 
zeile wird dem Aufrufer in der Variablen 'command line' geliefert. 
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PROC get command (TEXT CONST dialogue text) 

Zweck: s.o. Allerdings wird eine interne Kommandozeile des PaKets 'com- 
mand handler' als 'command line' verwandt. Dadurch wird es 
m6glich, alle Spuren einer Kommandoeingabe durch 'cover tracks' (s. 
dort) zu beseitigen. 

command handler 

PROC analyze command (TEXT CONST command list, command line, 
INT CONST additional permitted type, 
INT VAR command index, number of params, 
TEXT VAR param 1, param 2) 
Zweck: Die ubergebene Kommandozeile ('command line') wird anhand der 
ubergebenen 'command list' analysiert. Sie ist ein TEXT, der aus 
einer Folge von Kommandospezifikationen besteht. Jede hat die 
Form 



K Kommandotext, Prozedumame nach ELAN - Syntax 

I Hauptindex, Form eines INT-Denoters 

P Parameterspezifikation, eine Folge der Ziffern 0, 1 und 

2. 



Beispiele: 

-'edit: 15.012' 

Das Kommando 'edit' wird in drei verschieden parametrlsier- 
ten Formen spezifiziert: 

edit mit 0 Parameter erhalt Index 15 

edit mit 1 Parameter erhalt Index 16 

edit mit 2 Parametem erhalt Index 17 



-'fetch: 18.1' 

Das Kommando 'fetch' wird in einer Form spezifiert: 
fetch mit 1 Parameter erhalt Index 18 



Die Analyse erfolgt gemaB ELAN - Syntaxregeln. Dabei sind als Pa- 
rameter Denoter vom Typ TEXT und vom ubergebenen 'additional 
permitted type' zugelassen. Diese Typen werden wie beim Scanner 
(s. Benutzerhandbuch Kap. 11.1) angegeben: 
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1 tag 

2 bold 

3 number 

4 text 

5 operator 

6 delimiter 

Falls das Kommando in der Kommandollste gefunden wird (und die 
Syntax in Ordnung ist), wird der entsprechende 'command index' zu- 
ruckgemeldet. Die Parameter werden (falls vorhanden) in 'param 1' 
und 'param 2' abgelegt. Undefmierte Oder nicht vorhandene werden 
als Niltext geliefert. Ist das Kommando vorhanden, aber die Anzahl 
der Parameter stimmt nicht, wird der negative Hauptindex geliefert; 
ist es vollkommen unbekannt Oder ist die Kommandoeingabe zu 
komplex (mehrere Kommandos, Ausdrucke Oder komplexere 
ELAN - Statements), wird 0 geliefert. Der Anwender kann In solchen 
Fallen die Analyse mit einer anderen Kommandoliste fortaetzen, das 
Kommando dem ELAN - Compiler ubergeben Oder elne Fehlermel- 
dung ausldsen (s. 'command error'). 

PROC analyze command (TEXT CONST command list, 

INT CONST additional permitted type, 

INT VAR command index, number of params, 

TEXT VAR param 1, param 2) 

Zweck: s o. Allerdings wird die interne Kommandozeile des Pakets 'command 
handler' als 'command line' verwandt. 

command error 

PROC command error 

Zweck: Falls bei der Kommandoanalyse ein Fehler gefunden wurde, fuhrt er 
nicht zum 'errorstop', sondern wird nur hinterlegt. (Soil das Kom- 
mando dem Compiler ubergeben werden, liegt ja evt. Oberhaupt kein 
Fehler vor.) Diese hinteriegte Meldung kann mit 'command error' als 
'errorstop' gegeben werden. Mogliche Meldungen: 

"ungueltiger name" 

") fehlt" 

"( fehlt" 

"Parameter ist kein TEXT ("" fehlt)" 
"Kommando zu schwierig" 
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cover tracks 

PROC cover tracks 

Zweck: Die Spuren der letzten Kommandoanalyse werden gel&scht. Das 
dient u.a. dazu, daB spater eingerlchtete Sohntasks keine Relikte des 
Kommandos mehr auf dem Textheap vorfinden und evtl. vermittels 
nicht initialisierter TEXT VARs herausfinden kdnnen. Vollstandig 
kdnnen die Spuren aber nur dann geldscht werden, wenn fur die 
Kommandoanalyse die 'get command'- und 'analyze command' - 
Prozeduren benutzt wurden, die auf der intemen Kommandozeile des 
Pakets 'command handler' arbeiten. 

do command 

PROC do command 

Zweck: Die interne Kommandozeile des Pakets 'command handler' wird dem 
ELAN - Compiler zur Ausfuhrung ubergeben. 



Beispiole zur Kommandoverarbeitung 



Kleiner Monitor 

LET command list - "otto:1.12emll:3.012hugo:6.0" ; 

LET number - 3 , 
text - 4 ; 



INT VAR command index, params ; 
TEXT VAR param 1 , param 2 ; 
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PROC monitor : 
disable stop ; 

command dialogue (TRUE) ; 
REP 

get command ("gib kleines kommando:") ; 
analyze command (command list, text, 

command index, params, param 1, par am 2) 

execute command 

PER 

ENDPROC monitor ; 
PROC execute command : 
enable stop ; 

SELECT command index OF 

CASE 1 : otto (param 1) 

CASE 2 : otto (param 1, param 2) 

CASE 3 : emit 

CASE 4 : emil (param 1) 

CASE 5 : emll (param 1, param 2) 

CASE 6 : hugo 
OTHERWISE do command line 
END SELECT 

ENDPROC execute command ; 
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Steuerkommando - Analyse 
PROC command (TEXT CONST command text) : 
disable stop ; 

command dialogs (FALSE) ; 

analyze command (command list, command text, number, 

command index, params, param 1, param 2) ; 
execute command ; 
IF is error 
THEN put error ; 
clear error 

Fl 

ENDPROC command ; 
PROC execute command : 
enable stop ; 

SELECT command Index OF 
CASE .... 

OTHERWISE IF command index - 0 

THEN errorstop ("unknown command") 
ELSE command error 

Fl 

END SELECT 
ENDPROC execute command ; 
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4. Verschiedenes 



SESSION 



Mit Hilfe von 'session* kann man feststellen, ob das System neu gestartet wurde. 
Dabei spielt es keine Rolle, ob es korrekt fshutup') abgeschaitet wurde, oder ob 
es sich um einen "Rerun" handelt. 



session 

INT PROC session 

Zweck: Liefert eine "Sitzungsnummer". Diese wird automatisch bei jedem 
Systemstart erhflht. 

Beispiel: 
REP 

INT VAR old session : - session ; 
WHILE session - old session REP pause (100) PER ; 
putline ("Neuer Systemstart") 
PER 



INITFLAG 



lm Multi - User - System ist es oft notwendig, Pakete beim Einrichten einer neuen 
Task in dieser neu zu initialisieren. Z.B. muB das bei der Oateiverwaltung gemacht 
warden, da die neue Task ja nicht die Dateien des Vaters erbt. Mit Hilfe von 
INITFLAG - Objekten kann man zu diesem Zweck feststellen, ob ein Paket in die- 
sar Task schon initialisiert wurde. 
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INITFLAG 

TYPE INITFLAG 

Zweck: Erlaubt die Deklaration entsprechender Flaggen. 



OP : - (INITFLAG VAR flag, BOOL CONST flagtrue) 
Zweck: Erlaubt die Initialisierung von INITFLAGs 

initialized 

BOOL PROC initialized (INITFLAG VAR flag) 

Zweck: Wenn die Flagge in der Task A auf TRUE Oder FALSE gesetzt wurde, 
dann liefert sie beim ersten Aufruf den entsprechenden Wert, danach 
immer TRUE, (in der Task Al) 

Beim Einrichten von Sdhnen, wlrd die Flagge In den Sohntasks au- 
lomtisch auf FALSE gesetzt. So wird erreicht, dafl diese Prozedur in 
den neu eingerichteten Sohn und Enkeltasks genau beim ersten 
Aufruf FALSE liefert. 



Beispiel: 

PACKET stack DEFINES push, pop: 
INITFLAG VAR this packet : - FALSE ; 
INT VAR stack pointer ; 
ROW 1000 INT VAR stack ; 



PROC push (INT CONST value) : 
initialize stack if necessary ; 



ENDPROC push 
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PROC pop (INT VAR value) : 
Initialize stack if necessary ; 



ENDPROC pop ;. 

initialize stack if necessary : 
IF NOT initialized (this packet) 

THEN stack pointer : » 1 
Fl . 

ENDPACKET stack 



Bit -Handling 



Die Bit - Operationen arbeiten auf INT-Objekten. Sie konnen z.B. fur die Sy- 
stemprogrammierung benutzt werden, wenn es Bitmasken u.a. geht. 

Ein INT besteht aus 16 Bits. Dabei hat das niederwertigste die Nummer 0, das 
hdchstwertige die Nummer 15. 



AND 

INT OP AND (INT CONST left, right) 

Zweck: Bitweise UND - Verknupfung von 'left' mlt 'right'. 

OR 

INT OP OR (INT CONST left, right) 

Zweck: Bitweise ODER - Verknupfung von 'left' mit 'right'. 

bit 

BOOL PROC bit (INT CONST bits, bit no) 

Zweck: Liefert TRUE genau dann, wenn das Bit mit der Nummer 'bit no' in 
dem INT 'bits' gesetzt ist. 
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set bit 

PROC set bit (INT VAR bits, INT CONST bit no) 

Zweck: Das Bit mit der Nummer 'bit no' wird in 'bits' auf 1 gesetzt. 

reset bit 

PROC reset bit (INT VAR bits, INT CONST bit no) 

Zweck: Das Bit mit der Nummer 'bit no' wird In 'bits' auf 0 gesetzt. 

lowest sat 

INT PROC lowest set (INT CONST bits) 

Zweck: Liefert die Nummer des niederwertigsten 1 - Bits in 'bits'. 1st kein Bit 
auf 1 gesetzt, wird - 1 gellefert. 

lowest reset 

INT PROC lowest reset (INT CONST bits) 

Zweck: Liefert die Nummer des niederwertigsten O-Bits in 'bits'. 1st kein Bit 
auf 0 gesetzt, wird - 1 geliefert. 



5. Blockorientlerte Ein-/Ausgabe 



Die blockorientlerte Ein-/Ausgabe dient dazu, Datenraumselten (Blflcke) Oder Telle 
davon Goer die Kanale zu transferieren. Sie wird vom System u.a. beim Archivzu- 
griff und bei der Konfigurierung der Kanale eingesetzt. 

Die Wirkung der blockorientierten Ein - /Ausgabeoperationen kann dabel kanal- 
und rechnerspezifisch unterschiedlich sein. 
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blockin 

PROC blockin (DATASPACE VAR ds, INT CONST page nr, codel, code2, 

INT VAR return code) 
Zweck: Die Seite 'page nr' des Datenraums 'ds' wird "eingelesen". Die 
Operation kann durch 'codel' und 'code2' n&her gesteuert werden. 

PROC blockin (ROW 256 INT VAR block, INT CONST codel. code2, 

INT VAR return code) 
Zweck: Wie oben, nur wird der Block direkt als Datenstruktur ubergeben. 

blockout 

PROC blockout (DATASPACE CONST ds, INT CONST page nr. 

codel, code2, INT VAR return code) 
Zweck: Die Seite 'page nr* des Datenraums 'ds' wird "ausgegeben". Die 
Operation kann durch 'codel' und 'code2' naher gesteuert werden. 

PROC blockout (ROW 256 INT CONST block, INT CONST codel, code2, 

INT VAR return code) 
Zweck: Wie oben, nur wird der Block als Datenstruktur ubergeben. 

control 

PROC control (INT CONST codel, code2, code3, INT VAR return code) 
Zweck: Diese Prozedur dient zur Kanalsteuerung. 

ds pages 

INT PROC ds pages (DATASPACE CONST ds) 

Zweck: Liefert die Anzahl der belegten Seiten eines Datenraums. (Jede Seite 
ist 512 Byte groB.) 

next ds page 

INT PROC next ds page (DATASPACE CONST ds, INT CONST page nr) 
Zweck: Liefert die Nummer der nachsten (von 'page nr' an gerechneten) 
Seite des Datenraums. Die erste belegte Seite erhalt man durch 

next ds page (ds, - 1) 

Achtung: Die Seitennummem mussen nlcht luckenlos sein. 
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Teil 5: 

Supervisor, Tasks und Systemsteuerung 



1. Tasks 



Der Datentyp TASK 



Benannte Tasks warden innerhalb eines Rechners vollstandig und eindeutig fiber 
ihren Naman identifiziert. Eine weitere Moglichkeit der Identifikation besteht in der 
Verwendung von Datenobjekten vom Typ TASK. Beispiel: 

TASK VAR plotter :- task ("PLOTTER 1") 

Die Taskvariable 'plotter' bezeichnet jetzt die Task im System, die augenblicklich 
den Namen "PLOTTER 1" hat. Nun sind Taskvariablen auch unter Berucksichti- 
gung der Zeit und nicht nur im aktuellen Systemzustand eindeutig. Der Program- 
mierer braucht sich also keine Sorgen daruber zu machen, daB seine Taskvariable 
irgendwann einmal eine "falsche" Task (nach Lose hen von "PLOTTER 1" neu 
eingerichtete gleichen Oder anderen Namens) identifiziert. Wenn die Task 
"PLOTTER 1" gel6scht worden ist, bezeichnet 'plotter' keine gultige Task mehr. 

Unbenannte Tasks haben alle den Pseudonamen Sie k6nnen nur fiber 

Taskvariablen angesprochen werden. 

Der Task - Katalog wird vom Supervisor gefuhrt; andere Tasks kflnnen sich Kopien 
dieses Katalogs besorgen. Einige Prozeduren arbeiten auf dieser taskeigenen Ko- 
pie, ohne diese automatisch auf den neuesten Stand zu bringen (Effizienzgrunde). 
Das muB bei Bed art explizit geschehen. 



TEIL 5: Supervisor, Tasks und Systemsteuerung 



65 



TASK 

TYPE TASK 

Zweck: Intemer Taskbezeichner 



OP : - (TASK VAR dest, TASK CONST source) 
Zweck: Zuweisung von internewn Taskbezeichnem 



BOOL OP = (TASK CONST left, right) 
Zweck: Gleichheitsabfrage 

< 

BOOL OP < (TASK CONST left, right) 

Zweck: Clberpruft, ob die Task 'left' ein Sohn, Enkel, Urenkel, ... der Task 
'right' ist. 

/ TASK OP / (TEXT CONST task name) 

Zweck: Liefert die Task des angegebenen Namens, falls sie existiert. Der 
eigene Katalog wird automatisch aktualisiert. (identisch mit der PROC 
task (TEXT CONST task name). 
Fehlerfall: 

' task not existing 

access 

PROC access (TASK CONST task) 

Zweck: Aktualisiert den eigenen Taskkatalog, falls 'task' nicht darin entharten 
ist. 

access catalogue 

PROC access catalogue 

Zweck: Aktualisiert den eigenen Taskkatalog, indem die neueste Fassung 
vom Supervisor geholt wird. Die Prozeduren 'father', 'son', 'brother' 
arbeiten dann auf dieser neuen Fassung. 

archive 

TASK PROC archive 

Zweck: Liefert den internen Taskbezeichner der aktuellen Task mit Namen 
"ARCHIVE". Diese Prozedur dient zum schnellen und bequemen 
Ansprechen der Archivtask. 
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brother 

TASK PROC brother (TASK CONST task) 

Zweck: Liefert dsn nachsten Bruder von 'task'. Falls kein Bruder existiert, 
wird 'niltask' geliefert. Aktualisiert den eigenen Katalog nicht auto- 
matisch! 

exists 

BOOL PROC exists (TASK CONST task) 

Zweck: Informiert, ob die angegebene 'task' noch existiert. Der eigene Task- 
katalog wird dabei aktualisiert. 

Achtung: Diese Prozedur taugt nicht dazu, zu erfragen, ob eine Task 
mit bestimmten Namen im System exisiert. 

exists (task ("hugo")) 

Fall die Task "hugo" nicht existiert, fuhrt namllch schon 
der Aufruf 'task ("hugo")' zum 'errorstop ("task not exi- 
sting"). 

father 

TASK PROC father 

Zweck: Liefert die eigene Vatertask. 

TASK PROC father (TASK CONST task) 

Zweck: Liefert den Vater von 'task'. Existiert kein Vater (z.B. bei UR), wird 
niltask geliefert. Aktualisiert den eigenen Katalog nicht automatischl 

index 

INT PROC index (TASK CONST task) 

Zweck: Liefert einen INT -Wert von 1 bis 100, der 'task' unter alien glelch- 
zeitig (I) existierenden Tasks eindeutig identifiziert. 

is niltask 

BOOL PROC is niltask (TASK CONST task) 
Zweck: task - niltask 

myself 

TASK PROC myself 

Zweck: Liefert eigenen Task - Bezeichner. 
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name 

TEXT PROC name (TASK CONST task) 

Zweck: Liefert dan Namen von 'task'. Die Task muB noch im System exi- 
sberen, sonst 1st der Name nicht mehr bekannt. Falls die 'task' noch 
nicht im eigenen Katalog enthalten ist, wird er aktuallsiert. 

niltask 

TASK CONST niltask 

Zweck: Bezeichner fur "keine Task". So liefem die Prozeduren 'son', 'bro- 
ther' und 'father' als Resultat 'niltask', wenn keine Sohn-, Bruder- 
oder Vatertask existiert. 

printer 

TASK PROC printer 

Zweck: Liefert den internen Taskbezeichner der aktuellen Task mit Namen 
PRINTER. Diese Prozedur dient zum schnellen und bequemen 
Ansprechen des Druckspoolers. 

public 

TASK PROC public 

Zweck: Liefert den internen Taskbezeichner der PUBLIC -Task. 

son 

TASK PROC son (TASK CONST task) 

Zweck: Liefert den ersten Sohn von 'task'. Falls keiner im Katalog vermerkt 
ist, wird 'niltask' geliefert. Aktualisiert den eigenen Katalog nicht au- 
tomatischl 

supervisor 

TASK PROC supervisor 

Zweck: Liefert den internen Taskbezeichner des Supervisors. 

task 

TASK PROC task (TEXT CONST task name) 

Zweck: Liefert die Task des angegebenen Namens, falls sie existiert. Der 

eigene Katalog wird automatisch aktualisiert. 
Fehlerfall: 

' task not existing 
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Inter - Task - Kommunikation 



Die Task - Kommunikation im EUMEL System ist strikt botschaftsorientiert. Eine 
Botschaft bzw. "Sendung" besteht immer aus einem Sendungscode (INT) und 
einem Datenraum (DATASPACE). Damit kann eine Botschaft bis zu 1 Mbyte um- 
fassenl 

Kommunikation zwischen zwei Tasks ist nur mit dem Einverstandnis beider - des 
Senders und des Empfangers - mdglich. Eine Sendung kann also nur dann kor- 
rekt transferiert werden, wenn der Empflnger existiert und empfangsbareit ist. 
Diese Art der Kommunikation wurde gewahlt, urn 

- eine mdglichst einfache und effiziente Implementation zu ermoglichen, 

- mit den vorhandenen Primitiva moglichst flexlbel bei der Implementation 
"h6herer" Kommunikationsmethoden (z.B. Warteschlangen) zu seln. 



call 

PROC call (TASK CONST destination, INT CONST send code, 

DATASPACE VAR message ds, INT VAR reply code) 

Zweck: Die eigene Task wartet, bis die Zieltask 'destination' empfangsbareit 
ist. Dann wird die Sendung ('send code' und 'message ds') transfe- 
riert. AnschlieBend wartet die Sendertask auf eine Antwort von 'des- 
tination'. Fur Sendungen anderer Tasks ist sie dabei nicht (I) emp- 
fangsbereit, nur die Zieltask kann eine Antwortsendung schicken. 
Nachdem eine solche Antwort eingetroffen ist, wird sie in 'message 
ds' und 'reply code' geliefert und die eigene Task fortgesetzt. Wenn 
die angesprochene Zieltask nicht existiert, wird - 1 als 'reply code' 
geliefert. 'message ds' ist in diesem Fall unverandert. 
'call' hat Ahnlichkeiten mit einem Prozeduraufruf, nur ist es hier der 
Aufruf einer anderern Task. StOrungen konnen hierbei nicht auftreten, 
da der Zustand der Zieltask keine Rolle spielt - es wird auf Emp- 
fangsbereitschaft gewartet - und beim Warten auf Antwort auch kei- 
ne "Querschlagersendungen" von anderen Tasks dazwischenfunken 
konnen. 
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pingpong 

PROC pingpong (TASK CONST destination, INT CONST send code, 
DATASPACE VAR message ds, INT VAR reply code) 

Zweck: Diese Prozedur wirkt wie die entsprechende 'call' - Prozedur, wartet 
aber nicht (I), bis die Zieltask empfangsbereit ist. Wenn die Zieltask 
existiert, aber nicht empfangsbereit ist, wird - 2 als 'reply code' ge- 
liefert. Der 'message ds' ist dann nicht verandert. 

send 

PROC send (TASK VAR destination, INT CONST send code. 

DATASPACE VAR message ds, INT VAR receipt) 

Zweck: Wenn die Zieltask existiert und empfangsbereit ist, wird die Sendung 
('send code' und 'message ds') transferiert und die Zieltask aktiviert. 
Als 'receipt' wird 0 (-ack) gemeldet. Diese positive Quittung kommt 
nicht von der Zieltask, sondem bestAtigt nur, daB die Sendung ord- 
nungsgem&B ubertragen wurde. Der Datenraum gehdrt dann nicht 
mehr der Sender-, sondem der Zieltask, d.h. die Variable 'message 
ds' bezeichnet keinen gultigen Datenraum mehr. 
Im Gegensatz zu 'call' und 'pingpong' lauft die Sendertask ohne Halt 
weiter und wartet nicht auf eine Antwort von der Zieltask. 
Falls die Zieltask nicht existiert, wird - 1 , falls sie nicht empfangsbe- 
reit ist, - 2 als 'receipt' geliefert. Bei diesen negativen Ouittungen 
bleibt der Datenraum Eigentum der Absendertask, d.h. die Variable 
'message ds' bezeichnet immer noch elnen gultigen Datenraum. 

PROC send (TASK VAR destination, INT CONST send code, 
DATASPACE VAR message ds) 

Zweck: s.o. Negative Ouittungen (-1 oder -2) werden jedoch ignoriert. Der 
Datenraum wird entweder transferiert Oder geloscht ('forget'), steht 
also in keinem Fall mehr zur Verfugung. Die Prozedur sollte nur ver- 
wandt werden, wenn der Sender sicher ist, daB die Sendung transfe- 
riert werden kann, bzw. daB sie im Fehlerfall nicht transferiert zu 
werden braucht. 
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wait 

PHOC wait (DAT AS PACE VAR message ds, INT VAR message code. 
TASK VAR source task) 

Zweck: Die eigene Task geht in den offenen Wartezustand uber. Sie ist jetzt 
gegenuber alien anderen Tasks empfangsbereit. Sie wird erst fortge- 
setzt, wenn eine Sendung eintrifft. Diese wird in 'message ds' und 
'message code', die Absendertask in 'source task' geliefert. 

Der Sendungscode muB zwischen den Beteih'gten abgesprochen sein und ist also 
frei wahlbar. AHerdings sind negative Werte nicht erlaubt, sondem fur bestimmte 
"Pseudoantworten" vom Betriebssystem reserviert: 

- 1 "destination task not existing" 

- 2 "destination task not ready to receive" 

Weitere Codes warden in Systemroutinen standardmABig verwandt und sollten 
auch von Anwenderroutinen genauso interpretiert werden: 

0 "ack" positive Quittung 

1 "nak" negative Quittung 

2 "error nak" negative Quittung mlt Fehlermeldung. 

Der gelieferte Datenraum sollte die Struktur eines 
BOUND TEXTs haben und die Fehlermeldung In 
diesem TEXT beinhalten. 



Belspiel: Kommunikation mit einem Manager 

Auftraggeber Manager 



call (. ..) REP 

wait (ds, order, order task) ; 
execute order ; 
send (order task, reply, ds) 
PER 
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Da der Auftraggeber 'call' verwandet, wartet er automatisch so lange, bis der 
Manager fur ihn empfangsbereit wird. Dann schickt er die Sendung und geht 
gieichzeitig (I) in den geschlossenen "auf Antwort warten" - Zustand uber. Der 
Manger kann daner unbesorgt mit dem "unsicheren" 'send' antworten, da die 
Empfangsbereitschaft des Auftraggebers nur durch Katastrophen wie Ldschung der 
Task Oder "halt from terminal" gestdrt werden kann. (In diesen Fallen kann die 
Antwort ruhig ins Leere gehen.) 

Hier sieht man auch den Unterschied zwischen 

call (...) und send (....); wait (....) . 

Bei der zwerten Alternative k&nnen zwei Storfftlle eintreten: 

a) Beim 'wait' kann eine StOrsendung einer anderen Task elntreffen. 

b) Oa uber die zeitllchen Rahmenbedingungen nichts ausgesagt werden 
kann, 1st es moglich, daB der Manager die Antwort schickt, bevor die 
'wait' - Operation beim Auftraggeber ausgefuhrt werden konnte. In unse— 
rem Beispiel wurde das den Verlust der Ruckmeldung und ewiges Warten 
seitens des Auftraggebers auslosen. 

2. Supervisor 



Allgemein verfugbare Supervisor -Operationen 



begin 

PROC begin (PROC start, TASK VAR new task) 

Zweck: Es wird eine unbenannte Task (Pseudoname " - ") als neuer Sohn 
der aufrufenden eingerichtet und mit der Prozedur 'start' gestartet. 
Namenskollision ist nicht mdglich, die erzeugte Task kann aber auch 
nicht namensm&Big angesprochen werden. 'new task' identifiziert den 
neuen Sohn, falls kein Fehler auftrat. 

Fehlerfalle : 

* task directory overflow 
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PROC begin (TEXT CONST son name, PROC start, TASK VAR new task) 
Zweck: Es wird eine Task mit Namen 'son name' als Sohn der aufgerufenen 

eingerichtet und mit der Prozedur 'start' gestartet. 'new task' identlfi- 

ziert den neuen Sohn, falls kein Fehler auftrat. 
Fehierfalle : 

' task directory overflow 

■ incorrect task name ( oder LENGTH > 100 *) 
* duplicate task name 



begin password 

PROC begin password (TEXT CONST password) 

Zweck: Oiese Operation ist keine Supervisor- sondem eine taskeigene 
Operation. Bei normalen 'global manager' - Tasks kann man so das 
weitere Kreieren von Sohntasks unter PaBwortkontrolle stellen. Wenn 
dieses Kommando in der Manager -Task gegeben worden ist, wird 
bei folgenden SV - begin - Kommandos interaktiv das PaBwort ver- 
langt. Oabei gelten die ublichen PaBwort - KonvenBonen: 

a) "" (Niltext) bedeutet kein PaBwort. Damit kann man durch 
'begin password ("")' das PaBwort wieder ausschalten. 

b) "-" bedeutet jedes eingegebene PaBwort ist ungultig. Da- 
mit kann man durch 'begin password ("-")' das Einrichten 
von Sohntasks von auBen (durch SV- Kommando) abschai- 
ten. 



break 

PROC break 

Zweck: Die Task koppelt sich von einem evtl. angekoppelten Terminal ab. 
Bei der Abkopplung wird auf dem Terminal die Tapete" ("Terminal 
n ... EUMEL Version ...VM...") ausgegeben. 

PROC break (QUIET CONST quiet) 

Zweck: Die Task koppelt sich von einem evtl. angekoppelten Terminal ab. 
Dabei wird aber keine "Tapete" ausgegeben. 

channel 

INT PROC channel 

Zweck: Liefert die Kanalnummer der eigenen Task. Falls kein Kanal (Termi- 
nal) zugeordnet ist, wird 0 geliefert. 
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INT PROC channel (TASK CONST task) 

Zweck: Liefert die Kanalnummer der angegebenen Task. 1st kein Kanal zu- 
geordnet, wird 0 geliefert. 

clock 

REAL PROC clock (INT CONST index) 

Zweck: Liefert die Qber Index spezifizierte Systemuhr. Die Zeiteinheit ist 
1 sec, die MeBgenauigkeit 0.1 sec. 

clock (0) CPU -Zelt der elgenen Task 

clock (1) Realzelt des Systems 

REAL PROC clock (TASK CONST task) 

Zweck: Liefert die CPU - Zeit der angegebenen Task. 

Hinweis: Die CPU - Zeit beginnt mit der Taskkreation zu laufen. Sie gibt also 
jeweils die gesamte bisher verbrauchte CPU -Zeit an. Die Zeit- 
dauer bestimmter Operationen kann als Differenz zweier 'clock' - 
Aufrufe gemessen werden. Beim Ende einer Task wird ihr 
CPU - Zeitverbrauch dem Vater zugeschlagen, um Abrechnungen 
zu ermoglichen. 

continue 

PROC continue (INT CONST channel nr) 

Zweck: Die Task versucht, sich an den vorgegebenen Kanal anzukoppeln. 
Falls sie vorher schon an ein Terminal gekoppelt war, wird implizit 
'break' durchgefuhrt, falls die Aktion erfolgreich durchgefuhrt werden 
konnte. Ein erfolgreiches 'continue' beinhaltet Implizit 'reset auto- 
nom'. 

Anmerkung: Normale Tasks kftnnen auf die Kanale 1 - 24 zugreifen, 
Systemtasks durfen sich auch an die privilegierten 
Kanale 25 - 32 ankoppeln. 

Fehlerfftlle: 

' invalid channel 
' channel not free 
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end 

PROC end 

Zweck: Loscht die eigene Task und alle S6hne. Wenn die Task an ein Ter- 
minal angekoppelt ist, wlrd vorher angefragt, ob wirklich geloscht 
werden soil. AnschlieBend wird die Standardtapete auf dem Bild- 
schirm ausgegeben. 

PROC end (TASK CONST task) 

Zweck: L6scht die angegebene 'task', 'task' muB allerdings die eigene Oder 
eine Sohn- bzw. Enkel-Task der eigenen sein. Im Unterschied zur 
oben aufgefuhrten parameteriosen Prozedur 'end' wird nicht ange- 
fragt und auch keine Tapete ausgegeben. Wenn also die eigene Task 
ohne Reaktion auf dem Terminal beendet werden soil, kann dies mlt 
'end (myself)' geschehen. 

Fehlerfall: 

' not parent 

next active 

PROC next active (TASK VAR task) 

Zweck: 'task' wird auf die nachste aktive Task gesetzt. Aktiv sind alle Tasks, 
die sich im Zustand 'busy' beflnden oder auf Ein/Ausgabe warten (l/o) 
und an einen Kanal angekoppelt sind. Beispiel: 

TASK VAR actual task : - myself ; 
REP 

next active (actual task) 
UNTIL actual task - myself PER . 

Hier werden alle aktiven Tasks durchgemustert (z.B. fur Schedu- 
ling - Anwendungen). Dieses Verfahren ist sehr viel weniger aufwen- 
diger als eine Durchmusterung des ganzen Taskbaumes, liefert aber 
nur die gerade aktiven Tasks. 
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rename myself 

PROC rename myself (TEXT CONST new task name) 

Zweck: Die eigene Task erhalt als neuen Taskname 'new task name'. Damit 
kann auch aus einer benannten eine unbenannte Task mit dem 
Pseudonamen " - " werden. Umbenennung in die andere Rlchtung ist 
ebenfalls moglich. 

Achtung: Durch das Umbenennen der Task werden alle Taskvaria- 
blen, die sich auf diese Task beziehen, ungultig (als ware 
die Task geldscht und dann neu eingerichtet). 

Fehlerfalle: 

' duplicate task name 
' incorrect task name 



reset autonom 

PROC reset autonom 

Zweck: Die eigene Task deklariert sich beim Supervisor als nicht autonom 
(Normalzustand). Das bedeutet, 'continue' -Aufforderungen uber eln 
'Supervisor - Kommando' vom Terminal werden vom System ohne 
Benachrichtigung der Task durchgefOhrt. 



set autonom 

PROC set autonom 

Zweck: Die eigene Task deklariert sich beim Supervisor autonom (ublich fur 
Manager -Tasks). Wenn jetzt eln 'continue' -Supervisor -Kommando 
auf diese Task von einem Terminal aus gegeben wird, wird die Task 
uber 'send' eine Nachricht zugestellt. 

Achtung: Im autonomen Zustand Ist der Programmierer selbst fur die 
Reaktlon der Task verantwortllch. Man kann sie von auBen 
auf keine Weise gewaltsam an ein Terminal koppeln (er- 
moglicht PaBalgorithmen / Datenschutz). 
Um die Programmierung etwas zu entscharfen, wird eine 
Task automatisch aus dem autonomen in den Normalzu- 
stand uberfuhrt, wenn sie selbst ein 'continue' glbt (s. 
dort). 
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status 



INT PROC status (TASK CONST task) 

Zweck: Liefert den Status der angegebenen Task: 



0 



- busy - Task ist aktiv. 

I/o Task wartet auf Beendigung des Outputs Oder 

auf Eingabe. 

wait Task wartet auf Sendung von einer anderen 

Task. 

busy - blocked Task Ist rechenwlllig, ist aber blockiert. 
i/o - blocked Task wartet auf I/O, ist aber blockiert. 
wait - blocked Task wartet auf Sendung, ist aber blockiert. 

Achtung: Die Task wird beim Eintreffen einer 
Sendung automatisch entblockiert. 



2 



4 
5 
6 



storage 

PROC storage (INT VAR size, used) 

Zweck: Informiert uber den physisch verfugbaren ('size') und belegten 
('used') Speicher des Gesamtsystems. Die Einheit ist KByte. 
Achtung: 'size' gibt den Speicher an, der benutzt werden kann, ohne 



in eine EngpaBsltuation zu kommen. Tatsachlich wird auf 
dem Hintergrundmedium noch eine gewisse Reserve frei- 
gehalten Wenn diese angebrochen wird, befindet sich das 
System Im SpeicherengpaB. Dieser Zustand kann mit 'used 
> size' abgefragt werden. 



INT PROC storage (TASK CONST task) 

Zweck: Liefert die Gr6Be des Speicherbereichs in KByte, den die angegebe- 
nen Task augenblicklich belegt. 

Dabei werden durch Sharing mogliche Optimierungen nicht beruck- 
sichtigt. D.h. eine Task kann physisch erheblich weniger Speicher ate 
logisch belegen. Entsprechend kann die Speichersumme aller Tasks 
den physisch belegten Speicherberelch des Gesamtsystems be- 
trachtlich uberschreiten. 
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task password 

PROC task password (TEXT CONST password) 

Zweck: Das angegebene PaBwort wird beim Supervisor hinterlegt. Bei fol- 
genden SV - Kommandos 'continue...' auf diese Task wird interaktiv 
das PaBwort abgefragt. Oaoei gelten die Oblichen PaBwort - Konven- 
tionen: 

a) "" (Niltext) bedeutet kein PaBwort. Damit kann man durch 
'task password ("")' das PaBwort wieder ausschaJten. 

b) "-" bedeutet jades eingegebene PaBwort ist ungultig. Da- 
mit kann man durch 'task password ("-")' das Ankoppeln 
an ein Terminal von auBen (durch S V - Kommando) unter- 
binden. 



Privilegierte Supervisor - Operationen 



Die Im folgenden aufgefuhrten privilegierten Operationen konnen nur von System- 
tasks - das sind direkte Oder indirekte Sonne des Supervisors - ausgefuhrt 
warden. Urn MiBbrauch unmoglich zu machen, sollte der Supervisor nach der 
Einrichtung der gewunschten Systemtasks bzgl. der Einrichtung neuer Sohne ge- 
sperrt und alle Systemtasks durch PaBworte geschutzt werden (siehe Tail 1). 



block 

PROC block (TASK CONST task) 

Zweck: Die angegebene Task wird blockiert, d.h. so lange von der Verarbei- 
tung suspendiert, bis die Blockade durch 'unblock' wieder aufgeho- 
ben wird. Diese Operation wird vom Scheduler benutzt. Andere Tasks 
sollten sie normalerweise nicht anwenden, urn dem Scheduling nicht 
entgegen zu wirken. 
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collect garbage blocks 

PROC collect garbage blocks 

Zweck: Es wird eine auBerplanmaBige Gesamtmullabfuhr durchgefuhrt. Plan- 
maBig (d.h. ohne Aufruf dieser Prozedur) wird sie alle 15 Minuten und 
in EngpaBsituationen durchgefuhrt. 

Achtung: Dlese Operation erfordert starkes Paging und dauert dem- 
entsprechend lange. 

end 

PROC end (TASK CONST task) 

Zweck: Die angegebene Task wird geloscht. Systemtasks (direkte und indr— 
rekte Nachkommen des SUPERVISORS) konnen beliebige andere 
Tasks (nicht nur eigene S&hne) loschen. 

fixpoint 

PROC fixpoint 

Zweck: Fur das Gesamtsystem wird ein auBerplanmafiiger Fixpunkt geschrie- 
ben. PlanmaBige Fixpunkte (d.h. ohne Aufruf dieser Prozedur) werden 
alle 15 Minuten geschrieben. 

Achtung: Diese Operation erfordert starkes Paging (ROckschrelben 
aller veranderten Seiten auf das Hintergrundmedium) und 
dauert dementsprechend lange. 

prio 

INT PROC prio (TASK CONST task) 

Zweck: Liefert die augenblickliche Prioritat der angegebenen Task. 

PROC prio (TASK CONST task, INT CONST new prio) 
Zweck: Setzt die Prioritat der Task. 

Hinweis: Naheres zur Bedeutung der 'prio' findet man im Kapitel 'Schedu- 
ling'. 

set date 

PROC set date 

Zweck: Datum und Uhrzeit kdnnen im Dialog gesetzt werden (Form wie bei 
dem Start des Systems) . 
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save system 

PROC save system 

Zweck: Der gesamte Systemhintergrund wird auf Archivdisketten gesichert. 
Zu diesem Zweck wird das System wie bei 'shutup' heruntergefah- 

ren. 



shutup 

PROC shutup 

Zweck: Kontrolliertes Herunterfahren des Systems. Beim nachsten System- 
start wird automatisch Datum und Uhrzeit erfragt, wenn der Kom- 
mandodialog eingeschaltet ist ('command dialogue (TRUE)'). Falls 
diese Prozedur nicht vor dem Abschalten aufgerufen wurde, findet 
beim Neustart ein Aufsetzen auf dem letzten Fixpunkt start (RERUN). 



unblock 

PROC unblock (TASK CONST task) 

Zweck: Eine vorherige Blockierung der Task wird aufgehoben. Ist die Task 
nicht blockiert, bewirkt 'unblock' nichts. Diese Operation wird vom 
Scheduler benutzt. Andere Tasks sollten sie normalerweise nicht 
anwenden, um dem Scheduling nicht entgegen zu wirken. 



3. Systemverwaltung 



Achtung Dieser Teil des Systemhandbuchs ist nur fur solche Multi User Installa- 
tlonen von Bedeutung, die erweiterte Systemverwaltungsfunktlonen ge- 
nerieren bzw. modifizieren wollen. 



Das EUMEL System ist in der ausgelieferten minimalen Standardform 
(ohne die Features) ohne weiteres benutzbar. 
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Der Systemmanager SYSUR 



Der Systemmanager verhalt sich im wesentlichen wie ein normaler Dateimanager, 
allerdings mit folgender Erweiterung: 

- Die Operationen 'list' und 'fetch' k&nnen von alien Tasks des Systems 
und nicht nur von Sdhnen durchgefuhrt werden. Damit kann man System- 
verwaltungsdateien (z.B. "logbuch") von alien Tasks aus lesen. 'erase' und 
'save' sind jedoch nur von Sdhnen bzw. Enkeln - d.h. von privilegierten 
Systemtasks aus - zulassig. 

Das Paket stellt folgende Operationen zusatzlich zur Verfugung: 

generate shutup manager 

PROC generate shutup manager 

Zweck: Es wird eine Sohntask mit Namen "shutup" kreiert. Diese Task ist 
nicht (I) paBwortgeschutzt, laflt aber keine normalen Kommandos zu, 
sondem fragt nur 

shutup (j/n) ? 

So kann jeder das System kontrolliert abschalten und die privilegier- 
ten Operationen des OPERATORS wie 'erase task' sind dennoch 
geschutzt. 

put log 

PROC put log (TEXT CONST log record) 

Zweck: Der angegebene 'log record' wird mit vorangestelltem Tasknamen 
des Absenders, Datums-und Uhrzeitangabe in die Logbuchdatel 
"logbuch" in der Task "SYSUR" geschrieben. Der neue Satz wird an 
die Datei angefugt. ("logbuch" wird z.B. vom EUMELmeter ver- 
wandt.) 

Hinweis: Bei Verwendung des Logbuchs darf die zwar groBe, aber doch 
endliche Dateikapazitat nicht vergessen werden. Nachdem das 
Logbuch mit 4000 Satzen voll ist, werden weitere 'put log' Opera- 
tionen ignoriert. Die Datei "logbuch" sollte deshalb - wenn sie 
beispielsweise vom EUMELmeter verwandt wird - von Zeit zu Zeit 
geldscht werden ('erase' bzw. 'forget')! 
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Scheduler 



Der Scheduler dient zur Verwaltung der rechenwilligen Hintergrundtasks. Will man 
den Scheduler (eventuell abgeAndert) insertieren, muB man die Task "scheduler" 
als Sohn von SYSUR einrichten Dann holt man die Datei "scheduler" vom Archiv 
und insertion sie. "scheduler" beinhaltet "eumelmeter". Es wird beim Start erfragt, 
ob die MeBroutinen aktiviert werden sollen Oder nicht. 



Funktionsweise des Schedulers 



Der Scheduler sammelt in bestimmten Zeitintervallen alle aktiven (rechnenden) 
Tasks ab, die an kein Terminal angekoppelt sind und auch keine Manager sind. 
Diese Tasks werden blocklert und in die Warteschlange der Stand ardklasse ein- 
gefGgt. 

Die Klassen des Schedulers werden durch die Taskprloritaten 5 bis 9 definlert. Die 
Standardklasse entspricht der Prioritat 7. Die Klassenzugehorigkert einer Task kann 
von einer Systemtask aus (z.B. von "OPERATOR") mlt der Prozedur 'prio' verftn- 
dert werden. 

Der Scheduler geht nach folgender Strategic von 

Anhand der Vordergrund/Hintergrundlast des Systems wird entschieden, ob 
uberhaupt Hintergrundtasks aktiv sein durfen, welche Klassen aktiv sein 
durfen und wieviel Hintergrundtasks gleichzeltlg rechnen durfen. 

Die wartenden Hintergrundtasks werden im Round Robin Verfahren aktiviert. 
Dabei kommt die Klasse n + 1 erst dann zum Zug, wenn die Warteschlange 
der Klasse n leer ist Oder weniger Tasks enthalt, als gleichzeitig aktiviert 
werden sollen. 
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Die implementierte Standardstrategie hat als oberste Maxima, dan Vordergrund auf 
keinen Fall zu st6ren. Dementsprechend wird dar Hintergrund nur aktiviert, wann 
eine der tolgenden Bedingungen erfullt ist: 

- Die Vordergrundlast des Systems llegt unter 3% . 

-Es ist keine normale Vordergrundtask (Nachfahre von "UR") an einen 
Kanal angekoppelt. Man beachte, daB Systemtasks hierbei nlcht berOck- 
sichtigt warden. Ein aktiver Drucker blockiert die Hintergrundtasks also 
nicht. 



EUMELmeter (Systemstatistik) 



Die MeBsoftware zum Protokollieren der Systembelastung befindet sich auf dam 
Standardarchlv. 

Falls das System keinan Scheduler benutzt, mufl elne MeBtask als Sohn von 
"SYSUR" eingerichtet warden. In diese Task muB dann die Datei "eumelmeter" 
vom Archiv gebracht und ubersetzt werden. 

Falls das System einen Scheduler beinhalten soil, muB bei der Generierung des 
Schedulers lediglich auf die Frage "mit eumelmeter (j/n) ?" mit "j" geantwortet 
werden. 

EUMELmeter 



Das EUMELmeter protokolliert die Systemlast in ca. 10 minutigen Abstanden in der 
Datei "logbuch" in "SYSUR". Fur jedes MaBintervall wird eine Zeile angefugt. Die 
Zeilen sind folgendermaBen aufgebaut: 
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tt.mm.jj hh:mm hg uf ub pw pb cpuf cpub cpus last nutz 



tt.mm.|j hh:mm Datum und Uhrzeit des Eintrags 

hg GrdBe des aktuell belegten Hintergrundspeichers 
(in KB) 

uf Anzahl der aktiven Vordergrundtasks 

ub Anzahl der aktiven Hintergrundtasks 

pw Paginglast bei wartender CPU (Paging/Watt) 

pb Paginglast bei aktiver CPU (Paging/Busy) 

cpuf CPU - Auslastung durch Vordergrundtasks 

cpub CPU -Auslastung durch Hintergrundtasks 

cpus CPU - Systemlast 

last Gesamtlast des Systems: 

pw + pb + cpuf + cpub+ cpus 

(Achtung: kann 100% ubersteigen, da Platte und CPU uber- 
lappt arbeiten konnen.) 

nutz Nutzgute im MeBintervall: 100% - pw - cpus 



Die Nutzgute gibt an, welcher Anteil der Systemarbeit fur 
echte Nutzarbeit verfugbar war. Sie 1st die Summe aus der 
echten Nutzlast 'cpuf + cpub' und der Leerzeit, die ja theore- 
tisch auch fur Nutzarbeit hfitte verwandt warden konnen. Sie 
lABt sich, wie oben angegeben, auch berechnen, indem man 
den idealerwelse uberflussigen Overhead 'cpus' und 'pw' von 
100% abzleht. 
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Hinweis: Man darf die zwar groBe, aber doch endliche Dateikapazitat nicht 
vergessen. Nachdem das Logbuch mit 4073 S&tzsn voll tst, 
warden weitere Protokollsatze ignoriert. Die Datei "logbuch" sollte 
deshalb von Zeit zu Zeit geloscht werden ('erase' bzw. 'forget'). 
Wird das Logbuch nur vom EUMELmeter benutzt, k6nnen bis zu 
ca. 670 Betriebsstunden protokolliert werden. 
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Teil 6: Drucker und Textverarbeitung 

1. Standard - Drucker vom Archiv generieren 



Auf dem Archiv 'STD' befinden sich neben dem 'std printer' auch die Genera- 
tordateien 

std printer generator/8 

zum Generieren eines Standard - Druckers im Single - User, sowie 

■td printer generator/M 
zum Generieren eines Standarddruckers im Multl - User. 

Die Generatoren kennen nur einen ganz einfachen Drucker: 

- jeweils ein Typensatz (equidistant) 

- einzige beim Drucker vorausgesetzte Steuerzelchen sind < CR > < LF > . 

Im Single - User wird der Drucker durch folgende Kommandos generiert: 

archive ("std"); fetch ("std printer generator/S", archive); 
run 

Im Multi User mu8 der Drucker in einer Task mil dem Namen 'PRINTER' gene- 
riert werden, die ein Sohn des SUPERVISOR'S sein sollte. 

Dies geschieht durch folgendes Supervisor - Kommando: 

begin ("PRINTER", "SUPERVISOR") 
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und dann die folgenden Monitor - Kommandos: 
archive ("std"); 

fetch ("std printer generator/M", archive); 
run 

Am SchluB jeder Generierung wird der Druckerkanal erfragt. 

Das Umsetzen von Zeichen im EUMEL -Code in den entsprechenden Drucker- 
code (Umlaute, B usw.) geschieht mit Hilfe des Konfigurators, indem der Druk- 
kerkanal entsprechend belegt wird (siehe "Konfigurator"). 



2. Druckeranpassung 



Aufbau des Drucksystems 



Die Generierung eines Drucksystems mit eigenem Hardware Interface erfolgt durch 
Insertieren in folgender Reihenfolge: 

Single User Multi User 

hardware interface hardware interface 
eumel printer eumel printer 

elan lister elan lister (optional) 

printer/S spool manager 

printer/M 

Dabei haben die einzelnen Pakete folgende Bedeutung: 

- hardware interface 

Hier werden die elementaren Routinen zur Ausgabe auf dem Drucker be~ 
reitgestellt. Dies Paket dient als Schniftstelle zwischen der Druckerhardware 
und dem 'eumel printer' und ist deshalb im allgemeinen auch hardwarespe- 
zifisch programmiert. 
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- eumel printer 

Der 'eumel printer' verarbeitet die mit Hilfe der Textkosmetik erstellten Datei- 
en. Dabei ruft er die entsprechenden Prozeduren des 'hardware interface' 
auf. 

- elan lister 

Die Installation des 'elan lister's ist optional. Bei insertiertem 'elan lister' 
werden Texte, die mit einem Kleinbuchstaben beginnen, als ELAN - Program- 
me angesehen (Refinementname) und entsprechend aufbereitet ausgegeben. 

-spool manager 

Der 'spool manager' ist nur im Multi-User zu verwenden. Er verwaitet in der 
Task PRINTER die eintreffenden Druckauftrage und leltet diese an den Druk- 
ker weiter. 

- printer/S 

Dieses Paket ist nur im Single - User zu verwenden. Es stellt die zum Drucken 
bendtigte 'PROC print (TEXT CONST name)' zur VerfOgung. Diese schaltet auf 
den Druckerkanal urn und ubergibt die zu druckende Datei an den 'eumel 
printer' bzw. 'elan lister'. 

- printer/M 

Dieses Packet startet den Druckerspool, erfragt den Druckerkanal und richtet 
an diesem den Drucker -Worker ein. 

Von den oben beschriebenen Paketen ist das Hardware - Interface speziell fur die 
einzelnen Drucker zu erstellen, wahrend die ubrigen Pakete nicht geandert zu 
werden brauchen und von der EUMEL -Gruppe gewartet werden. 



Definition des Drucker- Interfaces 



Um den 'eumel printer' an eine spezielle Druckerhardware anzupassen, mussen 
bestimmte Prozeduren zur VerfOgung gestellt werden. Der auf dem Archiv STD 
ausgelieferte 'std printer' stellt ein solches Hardware Interface dar, das auf fast 
jeder Druckerhardware lauffahig ist. Allerdings nutzt er keine der oft verfugbaren 
besonderen Druckerfahigkeiten (mehrere Typen, besseren Randausgleich, Pro- 
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portionaldruck usw.) aus. Will man alle Eigenschaften des eigenen Druckers nut- 
zen, muB man ein speziell darauf zugeschnittenes Hardware Interface program- 
mieren. Es muB dem Eumel Drucker folgende Prozeduren zur VerfGgung stellen: 

change type 

PROC change type (TEXT CONST name of type) 

Zweck: Der Schrifttyp wird auf den angegebenen Typ umgeschaltet. Diese 
Umschaltung kann auch mitten in einer Zeile auftreten. Die Typna- 
men sind installationsspezifisch (d.h. frei wahlbar). Der Type "" (Nil- 
text) isi allerdings immer der Standardtyp, sofem keine Fonttabelle 
geladen wurde (beim Standarddrucker rst dies nicht erforderlich). Alle 
unbekannten Schrifttypen sollten auf den Standardtyp abgebildet 
warden. 

Alle durch das Kommando 'on' gesetzten Elnstellungen warden zu- 
ruckgesetzt. 

If height of current font 

REAL PROC If height of current font 

Zweck: Abstand zwlschen 2 Zeilen bei einfachem Zellenvorschub (Im Nor- 
malfall 2.54 / 6.0). Dieser Wert kann mlt Hlrfe der Fonttabellen be- 
rechnet werden. 

limit 

PROC limit (REAL CONST x) 

Zweck: Die Zeilenlange wird dem Hardware Drucker als reelle Zahl in cm 
angegeben. Dieser Wert dient der 'block' - Routine zur Berechnung 
der Wortzwischenraume. 

line 

PROC line (REAL CONST proposed If) 

Zweck: Es sollen 'proposed If Zeilenvorschube durchgefuhrt werden. Als 
Anforderung ('proposed If) kflnnen beliebige REAL-Werte auftreten. 
Die Differenz zwischen dem tatsachllch durchgefuhrten und dem ver- 
langten Vorschub muB aufbewahrt werden, damit entsprechende 
Korrekturen (z.B. bei 'new page') - falls notwendig - durchgefuhrt 
werden konnen. Falls ein 'proposed If hardwarem&Big nicht moglich 
ist. sollte auf den nachstmoglichen Wert abgerundet werden. 0.0 
sollte nur dann gewahlt werden, wenn 'proposed If tatsachlich diesen 
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Wert hat. So sollte bei einem Drucker, der nur ganze ZeilenvorschO- 
be ausfuhren kann, 1.5 auf 1.0 abgebildet warden, 0.5 aber nicht auf 
0.0 sondem auf 1.0. 

material 

PROC material (TEXT CONST name of material): 

Zweck: Es soil auf das angegebene Papiermaterial umgeschaltet warden. 
Das Kommando kann nur zu Beginn eines Druckvorgangs auftreten. 
Die Materialnamen sind Installationsspezifisch, d.h. frei w&hlbar. Nur 
"" (Niltext) gibt immer das Standardmaterial an. Alle unbekannten 
Materiaiien sollten auf das Standardmaterial abgebildet werden. 

new page 

PROC new page 

Zweck: Es soli auf den Beginn der nachsten Seite positioniert werden. Der 
Druckanfang soil auf der durch das 'start' - Kommando festgelegten 
Position liegen. 

Falls die aktuelle Position gerade durch diese Werte beschrieben 
wird, soil kein Seitenvorschub (keine Leerseite) erzeugt werden. 
Befindet slch die aktuelle Position noch vor der durch das 'start' - 
Kommando festgelegten Position, so wird auf der aktuellen Seite bis 
zur Startposition vorgeschoben. 

off 

PROC off (TEXT CONST attribute) 

Zweck: Schaltet die mit 'on' gesetzten Modifikationen aus. 

on 

PROC on (TEXT CONST attribute) 

Zweck: Schaltet die Modifikation 'attribute' des aktuellen Schrifttyps ein. Zur 
Zeit ist unterstrichen (underline), fett (bold), kursiv (italic) und der 
Druck von weiB auf schwarz (revers) mdglich. Bei der Analyse der 
Konstanten 'attribute' wird nur der erste Buchstabe untersucht. Ist 
eine Modifikation auf der betreffenden Druckerhardware nicht 
moglich, so wird sie ignoriert. 
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papersize 

PROC papersize (REAL CONST weidth, length) 

Zweck: Liefert die Werte fur Lange und Breite des verwendeten Paplers an 
den Hardware - Drucker. Hierdurch ergeben sich Moglichkeiten zur 
Uberprufung der durch 'limit' und 'pagelength' gesetzten Einstellun- 



print text 

PROC print text (TEXT CONST content, INT CONST printmode) 

Zweck: Der Obergebene Text soil gedruckt werden. 'content' kann dabel eine 



ganze Zeile, aber auch nur einen Teil einer Zeile umfassen. 'printmo- 
de' informiert Gber linksbiindigen Druck und Blocksatz, sowie rechts- 
bundigen Druck und Zentrleren unter Verwendung von Tabulatoren. 

printmode Wirkung 



Wurde mit 'x pos' eine Positionierung in X-Richtung vorgenommen, 
so wird der Text 'content' dieses und aller folgenden Aufrufe von 
'print text' bis zum nachsten Aufruf von 'xpos', 'ypos' Oder 'line' 
gesammelt und erst dann gemaB printmode bzgl. der alten Positio- 
nierung in X-Richtung ausgegeben. Wurde eine Positionierung in 
X-Richtung vorgenommen und ist Blocksatz gefordert, so wird 
'content' auf die Lange (limit - xpos) geblockt und dann linksbundlg 
bzgl. der Positionierung ausgegeben. 

Wurde keine Positionierung in X-Richtung vorgenommen, so kann 
'printmode' nur die Werte 0 Oder 3 annehmen. 'content' wird dann ab 
der aktuellen Position linksbundig bzw. auf 'limit' geblockt ausge- 
druckt. 



gen. 



0 
1 
2 
3 



linksbundlg 
rechtsbundig 



zentrleren 
Blocksatz 
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printer cmd 

PROC printer cmd (TEXT CONST cmd) 

Zweck: Gibt die Anweisung 'cmd' als direkte Druckersteuerungsanweisung an 
den Drucker weiter. Solche Anweisungen warden benAtigt, um spe- 
zielle Druckereigenschaften auszunutzen, die im EUMEL - Drucker 
nicht realisiert sind. 

reset printer 

PROC reset printer 

Zweck: Der Drucker soli in den Grundzustand uberfuhrt werden (Standard- 
schrifttyp, StandardpapiergrOBe, usw.). Die Prozedur wird zu Beginn 
jedes Druckvorgangs aufgerufen. 

start 

PROC start (REAL CONST x, y) 

Zweck: Durch die cm -Angaben x und y wird die obere linke Ecke des 
Schrelbfeldes festgelegt (linker Rand: x cm, oberer Rand: y cm), 'new 
page' positioniert dann immer auf die durch diese Prozedur festge- 
setzte obere llnke Ecke. 

x factor per inch 

INT PROC x factor per Inch 

Zweck: Gibt die Anzahl der mlnlmalen Schritte pro inch des aktuellen Schrift- 
typs in x-Richtung an. Dieser Wert kann mit Hilfe der Fonttabellen 
berechnet werden. 

x pos 

PROC x po6 (REAL CONST wert) 

Zweck: Positioniert in der aktuellen Zeile auf 'wert' cm vom linken Rand des 
Schreibfeldes. 

y pos 

PROC y pos (REAL CONST wert) 

Zweck: Positioniert vertikal auf 'wert' cm vom oberen Rand des Schreibfel- 
des aus. 
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3. Erstellung der Schrifttyp - Datei 



Oer EUMEL - Drucker sowie 'Hneform/autofomV und 'pageform' ("Textkosmetik") 
sind standardmaBig auf eine Schrift mit 10 Zeichen/lnch und 6 Zeilen/lnch einge- 
stellt. Der Name dieser Schrift ist "". Die Schrifttyp - Datei dient dem EUMEL - 
Drucker und der Textkosmetik, urn einen odor mehrere andere Schrifttypen ein- 
zustellen. 

Sie mussen den voreingestellten Zeichensatz nur andem, wenn 

- der Drucker Ihrer Installation uber einen anderen als den voreingestellten Zei- 
chensatz (z.B. 12 Zeichen/lnch) verfugt; 

- man mit lineform mehrere Zeichensatze bearbeiten will, well der zur Verfugung 
stehende Drucker mehrere Zeichensatze abbilden kann Oder weil eine Datei 
formatiert warden soil, die auf einer anderen Installation mit anderen Zeichen- 
satzen 

gedruckt warden soil. 

Dies erfolgt mit dem Aufruf der Prozedur 

PROC load font table (TEXT CONST schrlftdatel) 

und kann - soweit erforderlich - mehimals wiederholt warden. Sie mussen 'load 
font table* 

a) in der Task PRINTER geben, urn den EUMEL - Drucker mit den Schriften zu 
laden. Beachten Sie, daB sie fur eine Proportional - Schrift den EUMEL -Druk- 
ker anpassen mussen (der Standard - Drucker kann keine Proportionalschriften) 
oder einen vorgefertigten anderen Drucker ubernehmen mussen. 

b) in der Task PUBLIC, urn 'lineform/autoform' und 'pageform' mit den Schriften 
zu laden. Die neuen Schriften gelten dann fur jede neu eingerichtete Task. 
Bereits vorher vorhandene Tasks haben noch die voreingestellte Schrift bzw. 
vorher geladene Schriften. 
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c) Sie konnen die Schrifttyptabelle auch in einer anderen Task laden. Dann gelten 
die neu eingestellten Schriften nur in dieser Task (bzw. deren Sohn- Tasks). 
Das ist manchmal notwendig, wenn Dateien formation werden sollen, die auf 
anderen Druckern gedruckt werden sollen. 

Die eingestellten Schriften in 'lineform' werden bei jedem Aufruf von 'load font 
table' uberschrieben. 

'lineform'/'pageform' und der 'eumel drucker' mussen die Brelte, H6he u.a.m. von 
Zeichen wissen. Diese werden in der Schrifttyptabelle angegeben. Aus Effizienz- 
grunden wird intern aber nicht mit REALs, sondem mit INTs gerechnet. Zur Be- 
rechnung der (INT-) Breiten wird ein Umrechnungsfaktor benutzt. Dieser ist 
standardmaBig auf 250 gesetzt, um auch besonders breite Schriften (mehr als 1 
cm) verarbeiten zu k6nnen. Allerdings treten dann Ungenauigkeiten in Form von 
Rundungsfehlem auf. Dies kann vermindert werden, indem man den Faktor erhoht 
mrt 

factor (500) 

In der Datei 'schriftdatei' mussen die einzustellende(n) Schrift(en) fur Drucker 
und/oder 'lineform' zeilenweise nach folgender Konventlon stehen: 

# < Schriftname > # < fest o. prop > < Blankbrelte > < Lf > < factors > [Schritt] [nr] 
< Zeichen > < Zeichenbreite > [Ersatzzeichen] ] 

Die Angaben in spitzen Klammern mussen vorhanden sein, wahrend die in eckigen 
Klammern optional sind. Jede Angabe muB durch (mindestens) ein Leerzeichen 
von einer folgenden Angabe getrennt werden. Die Angabe der zweiten Zeile kann 
mehrmals erscheinen. Mehrere Schrifts&tze konnen hintereinander angegeben 
werden. 

Der erste Schriftsatz der Datei ist der automatlsch voreingestellte Schrifttyp von 
lineform, pageform und EUMEL- Drucker. Das Ist der Standard - Schriftsatz, den 
man erhalt, wenn 

-kelne 'type' - Anweisung in einer von 'lineform' zu bearbeltenden Datei Oder 
einer vom Drucker zu druckenden Datei angegeben wird. 

-in einer 'type' -Anweisung ein unbekannter Schriftname angegeben wurde. 
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Dabei bedeuten: 

- Schriftsatzname der Name des Schriftsatzes (ohne Leerzeichenl) (also der, den 
man 'type' Kommando nachher angeben mufl). Beispiele: 

#pica# (" name 'pica' ') 

#elitedeutsch# (' Name kann im 'type' -Kommando 'elite deutsch' geschrieben 
warden ') 

#tnum60# (' Faktoren und der Schriftname hangen zusammen *) 
Existiert eine Schrift in unterschiedlichen GroBen, muB mehr als ein Faktor 
angegeben werden. In dlesem Fall muB der erste der Faktoren am Ende des 
Schriftnamens in Form von Ziffern angegeben werden. Ein Schriftname ohne 
Ziffem am Ende bedeutet also, daB es von dieser Schrift keine unterschiedlichen 
GrdBen gibt. 

- fast Oder prop 

Angabe, ob es sich um einen aquidistanten Schriftsatz (Angabe: test) Oder elnen 
Schriftsatz handelt mit einer Proportional - Schrift (prop). 

- Blankbreite 

die Breite in cm des Leerzeichens des betreffenden Schriftsatzes 
(z.B. 0.254 fur einen Zeichensatz mlt 10 Zeichen/lnch 

0.212 " " " " 12 " " ) 

-Lf 

Zeilenvorschub in cm fur den angegebenen Schriftsatz. Der Drucker (und page- 
form) bewegt das Papier inhorizontaler Richtung um diesen Betrag, wenn eine 
Zeile mit dem < Schriftsatzname > geschrieben wird. Lf sollte so gewahlt wer- 
den: Hone des groSten Zeichens + 10%. 

- factors 

Ein Schriftsatz Kann in mehreren Gr6Ben vorhanden sein. Die geklammerten und 
durch Komma und blank getrennten factors - Angaben geben diese Unter- 
schiede in etwa an. Die Faktoren sind in der Regel 'points' -Angaben. Beispiel: 
(10, 15) 

Die Faktoren hangen auf folgende Weise mit den Schriftnamen zusammen: 
Existiert eine Schrift mit unterschiedlichen GrdBen, muB eine Grfissenangabe an 
den Namen angehangt werden (in Form von Ziffern). Die Ziffemangabe im 
Namen muB mit der jeweilig ersten Faktor -Angabe ubereinstimmen. Beispiel: 
#trium60# ... (60. 72. 80) ... 
#trium72# (72. 60, 80) ... 
#trium80# ... (80, 60, 72) ... 
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Die Faktoren dienen zur automatischer Schrifttypberechnung (z.B. in Formeln, 
um eine kleinere Oder grossere Schrift gleichen Typs zu finden). Wird nur ein 
Faktor angegeben, existieren keine anderen Gr6ssen der gleichen Schrift. 

- Schritt 

Anzahl Schritte pro Blank der kleinsten horizontalen Bewegung, die ein Drucker 
leistet. 

- nr 

Gibt die Nummer des Schrifttyps fur einen besttmmten Drucker an. 

Die folgenden Angaben Bind erforderlich, wenn es sich um einen Proportionaltyp 
handelt und/oder wenn eine Zeichenumsetzung vom Drucker vorgenommen 
werden muB: 

- Zeichen und Zeichenbreite 

Sind bei Proportionalschriften die|enigen Zeichen, deren Breiten in cm von der 
Breite des eingestellten Blanks abweicht. Beispiel: 
A 0.254 
B 0.212 
C 0.230 

Z 0.230 

- Ersatzzeichen 

gibt das Zeichen an, welches fur < Zeichen > gedruckt werden soil. Beispiel: 
[ 0.254 ) ('Fur das Zeichen '[' wird das Zeichen ')' gedruckt *) 



Beispiele: 



a) Einstellen eines Schriftsatzes mit Namen "" und 10 Zeichen/ Inch (AquidH 
stant): 



## fest 0.254 0.42333 ( 10 ) 
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b) Einstellen eines Schriftsatzes mit Namen "" und 12 Zeichen/ Inch (AquidH- 
stant): 

U fest 0.212 0.42333 ( 12 ) 

c) Einstellen von zwei aquidistanten Schriftsatzen: 

## fest 0.254 0.42333 ( 10 ) 
#elite# fest 0.212 0.4233 ( 12 ) 

d) Einstellen eines Proportionaltyps: 

)Cpropscrmft# prop 0.254 0.4233 ( 10 ) 
A 0.260 
B 0.270 
C 0.270 

Y 0.230 

e) Einstellen von zwei aquidistanten und zwei proportionalen Schriftsatzen (mit 
'pica' als erstem, also Standardtyp): 

#pica# fest 0 254 0.4233 ( 10 ) 
♦elite* fest 0.212 0.4233 ( 12 ) 
[ 0.212 ( 
) 0.212) 

#prop# prop 0.212 0.4233 ( 10 ) 
A 0.217 
B 0.23 

Z 0.22 

#nocheinprop# prop 0.212 0.4233 ( 10 ) 
A 0.25 
B 0.25 



A 0.237 
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f) Einstellen eines proportionalen Schriftsatzes in zwei unterschiedlichen Schrift- 
grossen: 

#test10# prop 0.254 0.4233 ( 10, 12 ) 
A 0.25 
N 0.25 



#test12# prop 0.254 0.4233 (12, 10) 
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Teil 7: Verschiedenes 



1 . Installation der Graphik - Pakete 



Das Graphik System besteht aus drei Teilen : 

1a) gerateunabhangiger Teil des "... plot" - Pakets 
1b) gerateabhangiger Teil des "... plot" - Pakets 
2) Das gerateunabftangige "plotter! " - Paket 

Zur Installation des Systems fur ein bestimmtes Endgerat wird das entsprechende 
plot -Paket ausgewahlt Oder selbst entwickelt (siehe Benutzerhandbuch). Dann 
werden zuerst 

"... plot" 
dann "plotten" 

insertiert. Dabei empfiehlt es sich, die Zeilennummemgenerierung fur Fehlermel- 
dungen der Pakete mit "check off" abzuschalten, um Code zu sparen. Bei Mul- 
ti-User Systemen kann man mehrere parallele Graphik - Systeme installieren, z. 
B. eine Graphik- Vater- Task fur normale Terminals und eine Plotter -Task. 

StandardmaBig wird u.a. das Paket "std plot" ausgeliefert. Es bedient als Gra- 
phik - Endgerat ein normales alphanumerisches Terminal. Wegen des sehr groben 
Rasters (48*79) ist die Darstellungsqualitat naturllch sehr schlecht. Insbesondere 
mac hen nahe beieinanderliegende Linien die Darstellung sehr unubersichtllch. Es 
ist auch nur ein realer Stift vorhanden. Trotz dieser Einschrankung kann man mit 
diesem Paket einfache Bilder (Funktionen, einfache K6rper o. a.) einigermaBen 
vernunftig auf einem Terminal darstellen, um im Dialog das Programm auszutesten 
Oder die geeignete Darstellung der Graphik auszuwdhlen (siehe Graphik - Editor). 
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Alle weiteren vorhandenen "... plot"-Pakete werden ebenfalls mit ausgeliefert. 
Diese Pakete werden aber in der Regel nicht von der EUMEL Systemgruppe ge- 
wartet, sondern von Installationen, die sie fur ihre eigenen Gerate entwickelt ha- 
ben. 



AnschluB neuer Graphik- Gerate 



Fur den AnschluB eines neuen Graphik - Gerates muB ein entsprechendes (gera- 
teabhangiges) "... plot"-Paket geschrieben werden. Das Interface zum (gerateu- 
nabhangigen) "plotten"-Paket ist folgendermaBen definiert : 



begin plot 
PROC begin plot 

Aktion: Das "ptotten" - Paket kundigt damit den Anfang einer Zeichnung an. 
Die Prozedur kann evtl. notwendige Initialisierungen durchfuhren (z.B. 
Terminal in den Graphik - Modus umschalten). Bei vielen Geraten wird 
sie mit leerer Leistung implementiert werden kdnnen. Auf keinen Fall 
sollte der Bildschirm geloscht bzw. das Papier am Plotter gewechselt 
werden. Dafur ist 'clear' zustandig. 



clear 
PROC clear 

Aktion: Das Graphik - Gerat muB in die Grundstellung gebracht und eine frele 
Zeichenflache zur Verfugung gestellt werden. Das wird beim Gra- 
phik - Terminal in der Regel Lose hen des Bildschirms und beim Plotter 
Papierwechsel heiBen. 



cursor on 
PROC cursor on 

Aktion: Das Endgerat sollte einen graphischen Cursor einschalten falls dieser 
vorhanden ist. 



cursor off 
PROC cursor off 

Aktion: Das Endgerat sollte einen graphischen Cursor ausschalten falls dieser 
vorhanden ist. 
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dir draw 

PROC dir draw (REAL CONST x, y, z) 

Aktion: Der aktuelle Stiff muB gesenkt zu den Rasterkoordinaten 'h,v', die den 
Weltkoordinaten 'x, y, z' entsprechen, gefahren werden ("zeichnen"). 
Die Weltkoordinaten konnen dabei einen Oberlauf produzieren. 

PROC dir draw (TEXT CONST text, REAL CONST angle, height) 
Aktion: Beginnend an der aktuellen Stiftposition sollte der angegebene Text mit 
der Buchstabengr68e 'height' und dem Winkel 'angle' gegenuber der 
Waagerechten geschrieben werden.Gr&Se 0.0 bedeutet dabei Stan- 
dardgrdBe (gerateabhangig). Es sollte jeweils die beste dem Gerat 
mdgliche Annaherung an Gr6Be und Winkel gewahlt werden. Der Stiff 
muB danach wieder auf der Ausgangsposition stehen. 

end plot 
PROC end plot 

Aktion: Das "plotten"-Paket kundigt damit das Ende einer Zeichnung an. Die 
Prozedur kann evtl. notwendige AbschluBmaBnahmen durchfuhren (z.B.: 
Terminal in den Text -Modus umschalten). Bel vielen Geraten wird sie 
mit leerer Leistung Implementiert werden kdnnen. 

dir move 

PROC dir move (REAL CONST x, y, z) 

Aktion: Der aktuelle Stift muB gehoben zu den Rasterkoordinaten 'h,v', die den 
Weltkoordinaten 'x, y, z' entsprechen, gefahren werden ("zeichnen"). 
Die Weltkoordinaten konnen dabei einen Oberlauf produzieren. 

graphic get 

PROC graphic get (TEXT VAR t, REAL VAR x, y) 

Aktion: Es sollte die aktuell Stiftposition in Weltkoordinaten und ein evtl. einge- 
gebener Text zuruckgeliefert werden. Bei den meisten Endgeraten wird 
man nur eine leere Leistung implementieren kdnnen. 

pen 

PROC pen (INT CONST colour, thickness, line type) 

Aktion: Es sollte zu dem realen Stift mit der bestmoglichen Annaherung an die 
gegebenen Werte umgeschaltet werden. Dabei sind die im Benutzer- 
handbuch definierten Standards fur 'colour', 'thickness' und 'line type' 
zu beachten. 
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set values 

PROC set values (ROW 3 ROW 2 REAL CONST size, 
ROW 2 ROW 2 REAL CONST limits, 
ROW 3 REAL CONST angles, 
ROW 2 REAL CONST oblique, 
ROW 3 REAL CONST perspective) 
Aktion: Die Werte fur die Darstellungsart werden gesetzt und die Transforma- 
tionsmatrix wird aufgebaut. Dieser Prozedur kann vom "std plot"-Pa- 
ket ubemommen werden, es mussen allerdings die Werte 'display nor' 
und 'display vert' auf die RastergroBe gesetzt werden. 

transform 

PROC transform (REAL CONST x, y, z, REAL VAR h, v) 

Aktion: Der dreidimensionale Vektor 'x, y, z' wird in den zweidimensionalen 

Vektor 'h, v' transformiert. Diese Prozedur kann ebenfalls vom "std 

plot" - Paket ubemommen werden. 



2. Spooler 



Das Paket "spool manager" befindet sich auf dem mitgellefertem Archiv. Es stellt 
folgende Prozedur zur Verfugung: 

spool manager 

PROC spool manager (PROC worker) 

Zweck: Die Task, in der die Prozedur aufgerufen wird, wird zur Spooler - 
Task (Naheres siehe Benutzerhandbuch). Es wird automatisch eine 
Worker -Task als unbenannter Sohn ("-") eingerichtet und mit der 
Obergebenen 'PROC worker' gestartet. Dieser Worker kann vom 
Spooler aus durch Spooler Kommandos (s. Benutzerhandbuch) 
geldscht und wieder neu eingerichtet werden. 

Der Worker erbt vom Spooler beim Start die Paketvariablen mit ihren 
aktuellen Werten. So kann er sich z.B. uber einen zugeordeneten 
Kanal (fur einen Drucker Oder Plotter als Worker) informieren. 
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Die Worker -Task kann sich neue Datenraume aus der Spooler Warteschlange 
folgendermaften holen: 

LET fetch code « 1 1 ; 

call (father, fetch code, ds, reply) 

Bel 'reply' « 'ack' (0) wurde der nachste Datenraum gellefert. Eine andere 
Ruckmeldung (error nak) tritt nur dann auf, wenn diese Anforderung nicht vom 
Worker des Spoolers, sondern von einer anderen Task erfolgt. 



3. Freie Kanale 



Das Paket 'free channel' erm6gllcht In Multi - User - Systemen die Einrichtung 
freier Kanale. Freie Kanale kann man zusatzlich zu dem Terminalkanai, der einem 
vom Supervisor zugeordnet wurde, benutzen. Jeder freie Kanal wird durch eine 
(benannte) Task - den Kanalmanager - implementiert. Er wird danach mit dem 
Tasknamen angesprochen und kann von jeder Task belegt und wieder freigegeben 
werden. Wahrend einer Belegung kdnnen andere Tasks den Kanal nicht benut- 
zen. Der Kanalmanager koppelt sich fur jede Belegung an den physikalischen 
Kanal an und gibt ihn danach auch wieder frei. Ein physikalischer Kanal kann also 
im Wechsel von mehreren Kanalmanagern oder einem Kanalmanager und "nor- 
malen" Tasks belegt werden. 

Das Paket 'free channel' muB beim Kanalmanager und alien Benutzem des Kanals 
bzw. bei einem gemeinsamen Vater inserted sein. 

FCHANNEL 

Zweck: Der Datentyp FCHANNEL spezifiziert einen freien Kanal. Die Assozii- 
erung mit einem realen freien Kanai erfolgt mit der Prozedur 'free 
channel' und der Zuweisung ': = ' (ahnlich wie beim Datentyp FILE). 

OP : = (FCHANNEL VAR dest, FCHANNEL CONST source) 
Zweck: Zuweisung. Wird insbesondere bei der Assoziation bendtigt. 
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close 

PROC Close (FCHANNEL VAR 0 

Zweck. Der belegte FCHANNEL wird freigeben. 

PROC close (TEXT CONST channel name) 

Zweck: Der namentlich spezifizierte Kanal wird freigegeben. 

dialogue 

PROC dialogue (FCHANNEL CONST f, TEXT CONST end of dialogue char) 
Zweck: Der Terminalkanal wird direkt mit dem angegebenen freien Kanal ge- 
koppelt. (Das Benutzerterminal wird "durchgeschaltet".) Eingaben am 
Terminal werden auf T ausgegeben, auf T ankommende Daten war- 
den auf dem Benutzerterminal ausgegeben. Der Datenverkehr erfolgt 
im Vollduplexmodus, d.h. der Datenverkehr beider Richtungen lAuft 
unabhanglg voneinander parallel. Hlermlt konnen Terminals dyna- 
misch an andere Rechner gekoppelt werden. Der Dialogzustand wird 
durch Eingabe des 'end of dialogue char' am Benutzerterminal 
beendet. 

free channel 

FCHANNEL PROC free channel (TEXT CONST channel name) 

Zweck: Der namentlich spezifizierte Kanal wird belegt und als FCHANNEL 

geliefert. 
Fehlerfalle: 

* task not existing 

' channel not free 

PROC free channel (INT CONST physical channel number) 
Zweck: Installiert die eigene Task als Kanalmanager fur den angegebenen 
physikalischen Kanal. 

in 

PROC in (FCHANNEL CONST f, TEXT VAR response) 

Zweck: Es wird die vom letzten 'in' Aufruf bzw. seit der Assoziierung bis jetzt 

auf dem Kanal eingetroffenen Daten geliefert. Bei 'niltext' liegen 

keine Eingabedaten vor. 
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open 

PROC open (FCHANNEL VAR f) 

Zweck: Der Kanal wird neu belegt. Die Assoziation erfolgt mit dem gleichen 

Kanal wie bei der letzten Assoziation. 
Fehlerfalle: 

' task not existing 

' channel not free 

out 

PROC out (FCHANNEL VAR f, TEXT CONST message) 

Zweck: Der ubergebene Text wird auf dem Kanal T ausgegeben. 

PROC out (FCHANNEL VAR f, DATASPACE CONST file space) 
Zweck: Der ubergebene Datenraum mufl eine Textdatei sein (Struktur eines 
FILEs haben). Er wird komplett auf dem Kanal T ausgegeben. 

PROC out (FCHANNEL VAR f. DATASPACE CONST file space. 
TEXT CONST handshake char) 

Zweck: s.o. Bei der Ausgabe wird nach jeder Zeile auf eine Quittung gewar- 
tet. Es warden alio Zeichen weggelesen, bis der spezifizierte 'hand- 
shake char' ankommt. ""O"" ist nicht als 'handshake char' zugelas- 
sen. 



Beispiele: 

FCHANNEL VAR f : = free channel ("otto") ; 
TEXT VAR antwort ; 

out (f, "hallo") ; 
in (f, antwort) ; 
put (antwort) ; 
close (f) ; 
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open (f) ; 
REP 

out (f, "hallo ") ; 

in (f, antwort) 
UNTIL antwort < > "" PER ; 
put (antwort) ; 
close (f) ; 

open (f) ; 
dialogue (f, "©") ; 
close (f) 
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